Question

Дана программа: Program Primer; Var M,result : real; Begin Writeln('Введите значения переменной M'); Write('M='); Readln(M); Result := sqr((1+M)*7); Writeln (result:8:0); Readln; End. Запусти Паскаль, введи данную программу, получи результат, если M=4. (В окошко для ответа запиши только числовое значение!)

Answer 1

Ответ:

1225

Объяснение:

Answer 2

Для выполнения данной программы с M=4 в языке Pascal, вы можете использовать следующий код:

pascalCopy code
Program Primer;
Var 
  M, result : real;
Begin
  Writeln('Введите значение переменной M');
  Write('M=');
  Readln(M);
  Result := sqr((1+M)*7);
  Writeln(result:8:0);
  Readln;
End.

После запуска этой программы и ввода значения M=4, результат будет выведен на экране. Он равен 196.