Дана программа:
Program Primer;
Var
M,result : real;
Begin
Writeln('Введите значения переменной M');
Write('M=');
Readln(M);
Result := sqr((1+M)*3);
Writeln ('sqr((1+M)*3)', result:8:0);
Readln;
End.
Запусти Паскаль, введи данную программу, получи результат, если M=1.
246
251
Ответы на вопрос:
Популярно: Информатика
-
andreyyyyyyy2004.11.2020 17:39
-
даша364315.01.2023 05:12
-
ladyviktoria16.07.2021 19:37
-
1amon110.10.2022 05:47
-
skshhd29.12.2022 04:53
-
Mouse12516.06.2022 15:15
-
misha9967205.10.2020 19:48
-
отличник73226.06.2022 04:39
-
tatyanablok10.03.2022 10:16
-
макс1728126.08.2021 02:02