Zhenalinp
4 год назад
Ввести а и б и вывести квадраты и кубы чисел от а до б Пример:Введите границы интервала: 46 4:16645: 251256: 36216
ОТВЕТЫ
Ясмина
Oct 24, 2020
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.
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.
346
Смежные вопросы:
