Question

ввести 2 целых числа a и b и вывести квадраты всех чисел от a до b
Пример:
Введите 2 числа:
4 и 5
4*4=16
5*5=25

Answer 1

Ответ:

Объяснение:

var a,b : LongInt;

begin

a := 4; b:= 5;

writeln(a,' * ', a, ' = ', a*a);

writeln(b,' * ', b, ' = ', b*b);

end.