Срочно помогите составить программу в паскале!!! Дано трехзначное число. В нем зачеркнули первую слева цифру и записали ее в конце. Найти числа.

Что -то не то у вас.

Хотя вычисление работает.

Это увас ABC Pascal? Мой Free Pascal такое объявление переменной не понимает. И Read Integer нет (может в каком модуле и сидит). Ну если объявить переменную в "классическом стиле" и ввод обычным Read(a) или Readln(a) всё работает.

Это паскаль ABV

Abc*

beginvar a:=Readinteger('Введите число');write(a mod 100*10+a div 100);end.