Условие задания:

2♦
Дана программа:
 
Program Primer;
Var
A,result : real;
Begin
  Writeln('Введите значения переменной
A');
  Write('
A=');
  Readln(
A);
  Result := sqr((
8+A)*9);
  Writeln ('sqr((
8+A)*9)', result:8:0);
  Readln;
End.

Запусти Паскаль, введи данную программу, получи результат, если A=3.
Ответ: 

Для того чтобы решать задания, необходимо зарегистрироваться.

Быстрая регистрация: