>> 8 .
3.5
(-) 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.