Напишите программу, которая получает два целых числа A и B и выводит квадраты всех натуральных чисел в интервале от A до B.
Напишите программу, которая получает два целых числа A и B и выводит квадраты всех натуральных чисел в интервале от A до B.
Ответ(ы) на вопрос:
Var
a,b,i:integer;
Begin
Write('Введите А и В ');
Read(a,b);
for i:= a to b do
writeln(a+(i-a),'^2 = ',sqr(i));
End.
Не нашли ответ?
Похожие вопросы