Ответы
Ответ дал:
1
Ответ:
Объяснение:
program Squares;
var
a, b, i: Integer;
begin
writeln('Введите два натуральных числа:');
readln(a, b);
writeln('Квадраты натуральных чисел между ', a, ' и ', b, ':');
for i := a to b do
writeln(i * i);
end.
Вас заинтересует
3 месяца назад
3 месяца назад
4 месяца назад
4 месяца назад
1 год назад
7 лет назад