составить программу для вывода на экран значений кубов натуральных чисел от 1 до 20

Question

Информатика

Талина

1 ноября, 16:39

составить программу для вывода на экран значений кубов натуральных чисел от 1 до 20

+2

Ответы (1)

Знаете ответ на вопрос?

Атя · Answer 1

Var i, d:integer;

uses crt;

Begin

for i:=1 to 20 do begin

d:=sqr (i) ;

end;

readln;

end.

Не проверял, накидал на быструю руку, но должно работать.