Дана программа:

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

Запусти Паскаль, введи данную программу, получи результат, если M=3.
(В окошко для ответа запиши только числовое значение!)

vanyabond2611    2   17.04.2020 14:58    2