Ввести натуральное число N вывести квадраты и кубы всех чисел от 1 до N. Желательно в КуМире или на любом другом алгоритмическом языке.

паскаль. var x,n: integer; begin write('n = '); readln(n); x := 1; while sqr(x) < n do begin write(sqr(x),' '); x := x + 1 end;   readln end. кумир вроде как тотак. заготовь мне переменные А, И: целые будут; начинай пишистроку ("Введите натуральное число: "); читай (А) ; в цикле по И от 1 до А начинай пишистроку (И, ":"); пишистроку (И*И, " ",И*И*И) ; пишистроку; кончай; читай; кончай!