Дана программа:
Program Primer;
Var
M,result : real;
Begin
Writeln('Введите значения переменной M');
Write('M=');
Readln(M);
Result := sqr((4+M)*4);
Writeln (result:8:0);
Readln;
End.
Запусти Паскаль, введи данную программу, получи результат, если M=3.
(В окошко для ответа запиши только числовое значение!)
2)Запусти Паскаль и введи программу:
program x1;
var
a,b,c:integer;
begin
a:=−14;
b:=abs(a);
writeln('abs(−14)=',b);
c:=sqr(b);
writeln('sqr(b)=',c);
c:=sqr(b+b);
writeln('sqr(b+b)=',c);
end.
При запуске программы вывод на экран:
abs(−14)=
sqr(b)=
sqr(b+b)=
172
178
Ответы на вопрос:
1) все крупные птицы имеют неяркое оперение; 2) ни один дикобраз не станет выписывать "таймс" 3) не все свиньи суть* орлы *суть = есть
Популярно: Информатика
-
Алёнка791308.11.2021 18:36
-
ehidna66630.01.2020 17:07
-
влад192221.11.2021 11:41
-
meowgro02.12.2020 20:54
-
karinkarinaka15.04.2022 14:12
-
refwqef08.09.2022 11:08
-
danchikpozitiv18.12.2020 00:24
-
кар9122.08.2022 02:04
-
TheFlyHelp22.11.2021 07:40
-
Стонт213219.06.2022 15:03