1) Какое число будет выведено на экран после выполнения этого фрагмента программы? write(1); for i:=2 to 3 do write(i);
2) Чему будет равно значение целой переменной «a» после выполнения этого фрагмента программы? a:=2; for i:=0 to 2 do begin a:=a+i end;
3) Чему будет равно значение целой переменной «a» после выполнения этого фрагмента программы? a:=10; for i:=1 to 3 do begin a:=a-1 end;
135
302
Ответы на вопрос:
Var x: real; begin read(x); if(x < -1) then writeln(-x + 1) else if(x > = -1) and (x < 0) then writeln(0) else writeln(x * x); end.
Популярно: Информатика
-
СветаТихая18.07.2022 19:18
-
balashik837917.08.2021 12:58
-
kolyakorolev07.04.2020 01:12
-
olesya826207.11.2020 20:11
-
malishkoartem2108.01.2021 19:37
-
Dinomyron28.12.2021 23:04
-
VERLIA13.08.2020 15:35
-
AliceWhite3184103.02.2022 11:24
-
Акакий5512.05.2021 13:13
-
stas745406.04.2022 18:51