Определите значение переменной s после выполнения следующих операторов: s: =10; for i: =1 to 4 do s: =s - i;

1. Полная программа:

Var S,i: Integer;
Begin
S:=10; For i:=1 to 4 do S:=S - i;
writeln(s);
End.

2. Значение переменной S: 0.