1. Выберите номер фрагмента программы, выполняющего такие же действия, что
и приведенный ниже:
for i:= 2 to 6 do begin x:=x+2i;
x:=x+1;
end;
1) i:=2; while i< 6 do begin x:=x+2i;
x:=x+1;
i:=i+1;
end;
2) i:=2; while i<= 6 do begin x:=x+2i;
x:=x+1;
end;
3) i:=2; while i<=6 do begin x:=x+2i;
x:=x+1;
i:=i+1;
end;
2.Определите значение переменной X после выполнения следующего фрагмента
программы:
x:=1;
repeat
x:=x+2;
x:=x+1;
until x>10;
3.Выберите аналогичный фрагмент приведенному выше, но записанный с цикла while.
1. X:=1;
While x>10 do begin x:=x+2; x:=x+1; end;
2. X:=1;
While x<10 do begin x:=x+2; x:=x+1; end;
3. X:=1;
While x<=10 do begin x:=x+2; x:=x+1; end;

194

379

Посмотреть ответы 1

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

ангел769

Информатика

4,6(15 оценок)

P: =1 for i: =1 to n do begin if (a[i] mod 2 = 0) and (a[i] mod 10< > 0) then p: =p*a[i]; end; writeln(p)

150 000+ пользователей

Оформить подписку