Program Primer; VarA,result : real;Begin Writeln('Введите значения переменной A'); Write('A='); Readln(A); Result := sqr((5+A)*5); Writeln ('sqr((5+A)*5)', result:8:0); Readln;End.Запусти Паскаль, введи данную программу, получи результат, если A=4
Ответ:
Данная программа находит квадрат выражения (3+A)*4.
Подставим сюда 3 и получим ((3+3)*4)²=24²=576
Ответ: 576
Объяснение: