Составить программу для вывода на экран значений кубов натуральных чисел от 1 до 20
Составить программу для вывода на экран значений кубов натуральных чисел от 1 до 20
Гость
Ответ(ы) на вопрос:
Гостьvar i,d:integer;
uses crt;
Begin
for i:=1 to 20 do begin
d:=sqr(i);
end;
readln;
end.
Не проверял, накидал на быструю руку, но должно работать.
Не нашли ответ?
Похожие вопросы