Ввести а и б и вывести квадраты и кубы чисел от а до б
Пример:
Введите границы интервала: 4 6
4: 16 64
5: 25 125
6: 36 216
Нет комментариев
Ответы
Гость Var
a, b: integer;
begin
write('граница а? ');
readln(a);
write('граница б? ');
readln(b);
for var i:=a to b do
writeln(i, ': ', sqr (i), ' ', i*i*i);
end.
1 комментария:
А можете также, только в кумире?
А можете также, только в кумире? Похожие вопросы
Информатика
Прочитай шуточные истории и построй графы ...
Информатика
....…………......,...............
Информатика
..........,...............,.,.:,..,..,,...
Список предметов
