УМОЛЯЮ Какой оператор цикла желательно использовать, если известно условие выхода из цикла?

1) while <условие> do <оператор>

2) for <параметр>:= <начальное значение> to <конечное значение> do <оператор>

3) repeat <оператор1, …> until <условие>

8. Цикл в фрагменте программы
a:=1;
b:=1;
while a+b<8 do
begin
a:=a+1; b:=b+2
end;
выполнится:

1)0 раз

2)3 раза

3)1 раз

4)2 раза

5)бесконечное число раз

9. Используется оператор for i:= -10 to 10 do…
После завершения выполнения тела цикла i = ...

7.(for)

8.(5. бесконечное количество раз)

9. не знаю

если предположить, что сначала уходили те, кто надел обувь большего размера, то таких будет, как минимум, двое. третий уходящий может надеть свою обувь. поэтому правильным ответом будет (б) 2 человека.

program xxx;

  var i, n, s, k : integer;

                        a : array [1..20] of integer;

begin

  write('введите n=');

  readln(n)

  writeln('введите элементы массива а: ' );

  for i: =1 to n do

        readln(a[i]);

  s: =0;

  k: =0;

  for i: =1 to n do

      if a[i] mod 8 = 0 then begin s: =s+a[i]; k: =1 end;

  if k=0 then write ('элементов кратных 8 - нет')

                      else write('сумма элементов кратных 8 =', s);

  readln

end.