Ответ:
Нельзя использовать точки
Нельзя оставлять поле именования пустым
Не должно быть символов * / \ | ?
64 символа = 6 битная кодировка
6*5=30 бит
Var n,i:integer;
begin
n:=0;
for i:=1 to 4 do
n:=n+i;
writeln(n);
readln;
<span>end.</span>
Шаг 1: I=1, S=S+I=0+1=1
шаг 2: I=2, S=1+2=3
Тело цикла: S:=S+I
S=3