Есть ответ 👍

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
Посмотреть ответы 2

Ответы на вопрос:

CoconutPie
4,6(20 оценок)

1)1

2)0

3)12

4)12

5)60

6)31

7)134

Объяснение:

Я смог


Var a, b, c: integer; begin read(a,b,c); writeln(a+b+c); //сумма writeln((a+b+c)/3); //ср. арифметическое end.

Популярно: Информатика