Определить значение переменной S после выполнения следующих команд:
S:=0; i:=1; while i>1 do begin s:=s+i*i; i:=i-1 end;

• 0
• 1
• 25
• 55