Срочно помогите составить программу в паскале!!! Дано трехзначное число. В нем зачеркнули первую слева цифру и записали ее в конце. Найти числа.
Какие числа?Что именно требуется?
любых три числа
Какой формат вывода?
Beginvar a:=Readinteger('Введите число');write(a mod 100*10+a div 100);end.
begin var a:=Readinteger('Введите число'); write(a mod 100*10+a div 100); end.
Что -то не то у вас.
Хотя вычисление работает.
Это увас ABC Pascal? Мой Free Pascal такое объявление переменной не понимает. И Read Integer нет (может в каком модуле и сидит). Ну если объявить переменную в "классическом стиле" и ввод обычным Read(a) или Readln(a) всё работает.
Это паскаль ABV
Abc*