Помогите! решаю задачу integer 8 ,это PascalABC.NET скажите где ошибка пишет что попытка ввести лишние результирующие данные, вот условие Дано 2-х значное число.Вывести число полученное при перестановки цифр исходного числа.
Вот моё решение,скажите где ошибка?
usesPT4;
begin
Task(Integer8);
var a,b,c:integer;
write(c);
read(c);
a:=c div 10;
b:=c mod 10;
c:=b*10+a;
writeln(c:=b*10+a,c);
end.

UsesPT4;
begin
Task(Integer8);
var a,b,c:integer;
read(c);
a:=c div 10;
b:=c mod 10;
c:=b*10+a;
writeln(c);
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку