Вопрос Срочно что не так в коде на паскале

[Владимир2033]

program namesandyears;

var a: Integer;

begin

writeln ('please, while your age'

readln (a);

if a > 18 then

writeln('несовершеннолетний гражданин'

else

writeln ('совершеннолетний гражданин'

Ehd.

 

[діма]

Ehd?

 

[Zat65]

program namesandyears;
var a: Integer;
begin
writeln ('please, while your age'
readln (a);
if (a > 18) then
begin
writeln('совершеннолетний'
readln();
end
else
begin
writeln('несовершеннолетний'
readln();
end;
end.

 

[pitbull]

Точка с запятой заканчивает оператор.
Поэтому вот тут: writeln('несовершеннолетний гражданин'); заканчивается оператор if.
И твой else теперь непонятно к чему относится.

 

[Den1ska]

program namesandyears;
uses crt;
var a: Integer;
begin
write ('please, while your age '
readln (a);
if a< 18 then
writeln('несовершеннолетний гражданин&#39
else
writeln ('совершеннолетний гражданин'
writeln('end program&#39
End.

 

[killmasters]

двоеточие перед else уберите