Помогите срочно!
Ввести а и b и вывести квадраты и кубы чисел от a до b.
Пример:
Введите границы интервала:
4 6
4 16 64
5 25 125
6 36 216
Pascal
var
a,b,i : integer;
begin
writeln (Введите границы интервала (a b):);
readln (a,b);
for i := a to b do
writeln (i, ,i*i, ,i*i*i);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
