Требуется выяснить какое число будет выведено в результате выполнения следующей программы:
var n, s :integer;
begin
n:=0;
s:=1000;
while s>=100 do
begin
s:=s-2;
n:=n+1;
end;
write(n)
end.

Question

Информатика: Требуется выяснить какое число будет выведено в результате выполнения следующей программы: var n, s :integer; begin n:=0; s:=1000; while s =100 do begin s:=s-2; n:=n+1; end; write(n) end.

AmiKot1105 · Answer

Відповідь:1Пояснення:while s =100 do (s=1000)s:=s-2;  (1000-2=998)n:=n+1; (0+1=1)...

Требуется выяснить какое число будет выведено в результате выполнения следующей программы: var n, s :integer; begin n:=0; s:=1000; while s>=100 do begin s:=s-2; n:=n+1; end; write(n) end.

Требуется выяснить какое число будет выведено в результате выполнения следующей программы:
var n, s :integer;
begin
n:=0;
s:=1000;
while s>=100 do
begin
s:=s-2;
n:=n+1;
end;
write(n)
end.