Введите, какое значение примет переменная S по завершению программы: Var N,i,S: integer;...

Question

Введите, какое значение примет переменная S по завершению программы:
Var N,i,S: integer;
Begin
N:=9;
S:=0; i:=1;
While i begin
S:=S+i;
i:=i+2;
end;
Writeln('S=', S);
End.

Comments

Код выполнится с ошибкой. Условие while не верно прописано

---

Var N,i,S: integer;BeginN:=9;S:=0; i:=1;While i begin S:=S+i; i:=i+2; end;Writeln('S=', S);End.

---

While i begin должно быть While [здесь условие] do begin

---

while i

---

там while i знак меньше N do

---

Посмотрите синтаксис WHILE

---

а теперь понятно

Answer 1

S=16

____________________