Написать программу!

[joker01]

царевна лягушка съедает ежедневно на 20 комаров больше,чем в пред день,и ещё 2 комара.Выведите на экран,через сколько дней кол-во съеденных комаров превысит 100,если в первый день съедено 12 комаров

[DoDge_VipeR]

s:=12;
x:=12;
i:=1;
while x<=100 do
begin
x:=x+22;
s:=s+x;
i:=i+1;
end;
writeln(i);

[DoDge_VipeR]

.........................

[joker01]

чо с этим делать?????

[ROMA2PVT]

А вы хоть раздел описания переменных сделали.

[joker01]

[joker01]

вот оно тут

[DoDge_VipeR]

перед

s:=12;

вставь begin