Напишите программу(turbo pascal)выводящую на экран кубы чисел от 1 до 20.заранее ))

2K99 2K99    2   22.06.2019 04:30    0

Ответы
Makoto2000 Makoto2000  02.10.2020 08:01
Program zadanie;
Var a,i:integer;
Begin
 For i:=1 To 20 Do
 begin
 a:=i;
 a:=sqr(a);
 Writeln(a);
 end;
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика