Question

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

Answer 1

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

Answer 2

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

Answer 3

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

Answer 4

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

Answer 5

Это паскаль ABV

Answer 6

Abc*