Var y,i:integer;
begin
while i<=10 do
begin
y:=y+i;
i:=i+1;
end;
Write(y);
End.
Ответ:4
Т.к условие должно выполняться и (x>3) и (x<5)
4 подходит и туда и туда ,значит это правильный ответ .
1)1ый условный оператор без условия
2)конец программы обозначается End., а не End;
Очевидно что это 223
при переводе в 8 систему нужно разбить число на троики где каждая тройка разряд ответа