Объяснение:
var
a, b, res: integer;
begin
{Начальные значения}
write('Input a: ');
readln(a);
write('Input b: ');
readln(b);
// Вычисление квадрата суммы чисел
res := (a + b)*(a + b);
// Вывод в консоль
writeln('result = ', res);
readln(); // удерживаем консоль
end.
Объяснение:
var
a, b, res: integer;
begin
{Начальные значения}
write('Input a: ');
readln(a);
write('Input b: ');
readln(b);
// Вычисление квадрата суммы чисел
res := (a + b)*(a + b);
// Вывод в консоль
writeln('result = ', res);
readln(); // удерживаем консоль
end.