>> 8 .

3.5

,

3.5.1.

:

  • while (-)
  • repeat (-)
  • for ( )

(-) while. :

    while <> do <>

:

    <> ; , ;

    <> , .

. 2.4.3 ( 14) q r .

    program n_14;
        var , , q, : integer;
    begin
        writeln (' ');
        write (' >>');
        readln ();
        write (' >>');
        read () ;
        r :=;
        q:=0;
        while r>=x do
        begin
            r:=r-y;
            q:=q+1
        end;
        writeln (' q=', q) ;
        writeln (' r=', r)
    end.

= -10 = 3? ?

 

 

@Mail.ru