Цикл со счетчиком
Список вопросов теста
Вопрос 1
var s,k: integer;
begin
s := 0;
for k := 4 to 8 do
s := s + 7;
writeln(s);
end.
Вопрос 2
var s,k: integer;
begin
s := 0;
for k := 7 to 11 do
s := s + 11;
writeln(s);
end.
Вопрос 3
var s,k: integer;
begin
s := 1;
for k := 3 downto 0 do
s := s * 3;
writeln(s);
end.
Вопрос 4
var y, i: integer;
begin
y := 5;
for i := 1 to 3 do
y := y + 5 * i;
writeln(y);
end.
Вопрос 5
var d, n: integer;
begin
d := 5;
d := d−3;
for n := 1 to 4 do
d := d + n;
writeln(d);
end.
Вопрос 6
var u, i: integer;
begin
u := 30;
for i := 1 to 6 do
u := u − i;
writeln(u);
end.
Вопрос 7
var k, i: integer;
begin
k := 2;
for i := 0 to 2 do
k := i + 3 * k;
writeln(k);
end.


