• Предмет: Информатика
  • Автор: evdakiyalopad
  • Вопрос задан 7 лет назад

Помогите решить пожалуйста ! Даю 35Б

Приложения:

Ответы

Ответ дал: HappyCoder
0

1)

  •  s := 1;
  •  for i := 2 to 3 do
  •  begin
  •    s := s * 2;
  •  end;
  •  Writeln(s);

Ответ 4

2)

  •  s := 1;
  •  for i :=0 to 3 do
  •  begin
  •    s := s + 2;
  •  end;
  •  Writeln(s);

Ответ 9

3)

  •  s := 10;
  •  a := 0;
  •  for i := 1 to 4 do
  •  begin
  •    s := s - a * 2;
  •  end;
  •  Writeln(s);

Ответ: 10

4)

  •  s := 1;
  •  a := 1;
  •  for i := 1 to 3 do
  •  begin
  •    s := s * a;
  •    a := a + 1;
  •  end;
  •  Writeln(s);

Ответ 6

5)

  •  s := 10;
  •  for i := 1 to 4 do
  •  begin
  •    s := s - 2;
  •  end;
  •  Writeln(s);

Ответ 2

Вас заинтересует