Имя не может начинаться с цифры
В имени допустимы только латинские буквы, цифры и знак подчеркивания
Имя рекомендуется делать мнемоническим
Я вообще в этом нуб. простите ни чем не могу помочь
<em>// PascalABC.NET 3.3, сборка 1625 от 17.01.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadInteger('n=');
if Abs(n).Between(100,999) then begin
Writeln('Число трехзначное');
if n.IsOdd then Writeln('Число нечетное')
else Writeln('Число четное');
if n div 100 = n mod 10 then Writeln('Его первая и последняя цифры равны')
else Writeln('Его первая и последняя цифры не равны')
end
else Writeln('Число не трехзначное')
end.
<u>Примеры</u>
n= 452
Число трехзначное
Число четное
Его первая и последняя цифры не равны
n= 313
Число трехзначное
Число нечетное
Его первая и последняя цифры равны
n= 18
Число не трехзначное