Вопрос Вот работа на паскале, везде проверил, все программы пишут что в конце нет end. В чём ошибка?

[Данил174рус]

program sr;
Var a,b,c:Integer;
begin
a:=1;
b:=20;
case (a > b) of
true : WriteLn('a > b');
else WriteLn('a < b');
end.

 

[noo]

У вас оператор CASE не завершен. Добавьте end; перед end.

 

[максиммммммммммммммм]

Если паскаль пишет, что нет end, значит его действительно нет.

 

[денис5777]

помоему точка не нужна

 

[paxa908]

пробел до точки... поставь