Очень прошу, помогите! Только скажите ответ числом, пожалуйста Program Primer; Var M,result : real; Begin Writeln('Введите значения переменной M'); Write('M='); Readln(M); Result := sqr((4+M)*5); Writeln ('sqr((4+M)*5)', r...
Очень прошу, помогите! Только скажите ответ числом, пожалуйста
Program Primer;
Var
M,result : real;
Begin
Writeln('Введите значения переменной M');
Write('M=');
Readln(M);
Result := sqr((4+M)*5);
Writeln ('sqr((4+M)*5)', result:8:0);
Readln;
End.
Запусти Паскаль, введи данную программу, получи результат, если M=4
Ответ(ы) на вопрос:
Гость
Введите значения переменной M
M=4
sqr((4+M)*5) 1600
Гость
1600 .................
Не нашли ответ?
Похожие вопросы