Question

Помогите пожалуйста с паскалем.Вывести квадраты и кубы чисел от a до b.

Пример:

Введите границы интервала

4 6

4 16 64

5 25 125

6 36 216

Answer 1

var
i,m,n: longint;
begin
write('Введите через пробел границы интервала: ');
readln(m,n);
for i:=m to n do
writeln(i,' ',i*i,' ',i*i*i);
end.