Алгоритмизация и программирование. Подготовка к ОГЭ

Определите, что будет напечатано в результате работы фрагмента программы. var n, s: integer; begin n:=4; s:=0; while n<=8 do begin s:=s+n; n:=n+1 end; write(s) end.

Определите значение переменной c после выполнения фрагмента программы. a:=30; b:=6; a:=a/2*b; if a>b then c:=a-3*b else c:=a+3*b;

Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin s:=0; k:=0; while s<80 do begin s:=s+2*k; k:=k+4; end; write(s); end.

Определите, что будет напечатано в результате работы фрагмента программы. var k, s: integer; begin s:=0; k:=1; while s<66 do begin k:=k+3; s:=s+k; end; write(k); end.

Запишите число, которое будет напечатано в результате выполнения программы. var s, n: integer; begin s:=47; n:=1; while s>0 do begin s:=s-9; n:=n+4 end; writeln(n) end.

Запишите число, которое будет напечатано в результате выполнения программы. var s, n: integer; begin s:=42; n:=1; while s>0 do begin s:=s–5; n:=n+3 end; writeln(n) end.

Определите, что будет напечатано в результате работы фрагмента программы. var n, s: integer; begin n:=4; s:=0; while n<=8 do begin s:=s+n; n:=n+1 end; write(s) end.

Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin s:=0; k:=0; while s<100 do begin s:=s+k; k:=k+4; end; write(k); end.

Определите значение переменной c после выполнения фрагмента программы. a:=22; b:=3; a:=- 2*b+a/2; if a

---

Ответ:

Бесплатно смотреть в боте