Вопрос я написал программу, а паскаль выдает ошибку: Встречено '.', а ожидалось ';' помогите найти ошибку

[алекс]

program P_2;
var k,kdiv100,n,s,sum:integer;
begin n:=0;
sum:=0;
s:=0;
for k:=100 to 999 do begin kdiv100:=k div 100;
s:=(k mod 10)+kdiv100+(k-kdiv100*100) div 10;
if (s mod 2)=1 then
begin sum:=sum+s;
n:=n+1;
s:=0
end;
writeln('Сумма ',sum,' . Количество элементов ',n)
end.

 

[Максим3123]

Што это за ших??

 

[мим]

writeln( затем бред какой то с кавычками . Прочтите правила как кавычки использовать.

 

[влад228]

Да, точно - цикл не закрыт.

 

[5342313]

3 раза „begin“ и всего 2 раза „end“ Они не просто так называются „Операторные скобки“…

 

[123453]

У тебя цикл не закрыт вроде бы. Добавить попробуй после end; ещё один end;