1. Чему будет равно значение целой переменной a после выполнения этого фрагмента программы?
a:=10;
for i:=1 to 3 do begin
a:=a-3;
end;
2. Чему будет равно значение целой переменной a после выполнения этого фрагмента программы?
a:=10;
for i:=0 to 4 do begin
a:=a-i;
end;
3. Чему будет равно значение целой переменной a после выполнения этого фрагмента программы?
a:=2;
for i:=0 to 4 do begin
a:=a+i;
end;
4. Чему будет равно значение целой переменной a после выполнения этого фрагмента программы?
a:=3;
for i:=1 to 4 do begin
a:=a+a;
end;
5. Определите, что будет напечатано в результате работы следующей программы.
var s, k:integer;
begin
s:= 0;
for k:= 4 to 11 do
s:= s + k;
writeln (s);
end.
6. Определите, что будет напечатано в результате работы следующей программы.
Var s,і:integer;
Begin
s:= 3;
For і:= 2 to 5 do
s:= s + 2*і;
Writeln(s);
End.
7. Какое число будет выведено на экран после выполнения этого фрагмента программы?
write(1);
for i:=3 to 4 do
write(i);
252
422
Ответы на вопрос:
Var a, b, c: integer; begin read(a,b,c); writeln(a+b+c); //сумма writeln((a+b+c)/3); //ср. арифметическое end.
Популярно: Информатика
-
qwwwq026.09.2022 09:12
-
маша305522.04.2020 00:25
-
Anakina111.11.2021 15:16
-
znanija11415.10.2020 16:58
-
lera106401.10.2020 01:21
-
Ааллалалал4422.06.2021 08:30
-
komarrik19.02.2021 10:31
-
Tamalova518.10.2022 08:14
-
anorbaeva09.09.2020 05:43
-
Magomedrasul0555507.12.2021 17:28