ответа, к сожалению, не знаю. Но вот что пишут на одном сайте
Здесь нет проверки на то, чтобы вводимое число было двузначным, поэтому нужно вводить именно двузначное, иначе выдаст неверный результат.
var
N: byte; { Двузначное число }
begin
write('N = ');
readln(N); { <-- вводим число }
writeln;
{ Находим и выводим левую цифру: }
writeln(' Левая цифра: ', N div 10);
{ Находим и выводим правую цифру: }
writeln(' Правая цифра: ', N mod 10);
readln
end.
ответа, к сожалению, не знаю. Но вот что пишут на одном сайте
Здесь нет проверки на то, чтобы вводимое число было двузначным, поэтому нужно вводить именно двузначное, иначе выдаст неверный результат.
var
N: byte; { Двузначное число }
begin
write('N = ');
readln(N); { <-- вводим число }
writeln;
{ Находим и выводим левую цифру: }
writeln(' Левая цифра: ', N div 10);
{ Находим и выводим правую цифру: }
writeln(' Правая цифра: ', N mod 10);
readln
end.