B:=2; C:=0;
while B<>6 do Begin C:=C+B; B:=B+1 End;
write(C)
B<>6 C B
0 2
+ 2 3
+ 5 4
+ 9 5
+ 14 6
Ответ: 14
B:=2; C:=0;
while B<>6 do Begin C:=C+B; B:=B+1 End;
write(C)
B<>6 C B
0 2
+ 2 3
+ 5 4
+ 9 5
+ 14 6
Ответ: 14