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.
!-- Step 2 - Decide on the place where you want to place the video -->
.
, . ,
-->