// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger(n=);
Writeln(Целая часть ,n div 10,, остаток ,n mod 10)
end.
Пример
n= 253421
Целая часть 25342, остаток 1
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.