6) (Д.В. Богданов) Запишите число, которое будет выведено в результате работы программы:...

Question

6) (Д.В. Богданов) Запишите число, которое будет выведено в результате работы программы:
var a, b, с : integer;
begin a := 0; b := 0; с := 0;
while 2 * a < 200 do begin
b := b + 3;
c := c - 1;
a := a + b + c
end;
write(a - 10)
end.

Answer 1

Вывод 100 
var a, b, с : integer; 
begin a := 0; b := 0; с := 0; 
while 2 * a < 200 do begin 
b := b + 3; 
c := c - 1; 
a := a + b + c 
end; 
write(a - 10) 
end.изи