Question

Написать программу вывода на экран квадратов и кубов целых чисел от 30 до 10 (в обратном порядке)

Answer 1

Ответ:

var i:  integer;

begin

i:=30;

for i downto 10 do begin writeln(i*i, i*i*i); end;

end.

Объяснение: