. 8 . .
!
!

 


>> 8 .

3.5

,

3.5.3.

(-) for. :

    for <>:=<_> to <_> do <>

:

    <> ;

    <_> <_> , , ;

    <> .

; .

. 2.4.3 ( 19) n .

    program n_16;
        var i, n: integer; a, y: real;
    begin
        writeln (' ');
        write (' >>');
        readln ();
        write (' n>>');
        readln (n);
        :=1;
        for i:=1 to n do y:=y*a;
        writeln ('y=', y)
    end.

 

 

@Mail.ru
<">