Дано целое двузначное число x. Запишите команды, позволяющие получить первую и последнюю цифры числа

Question

Валерьян

13 сентября, 21:17

+2

Ответы (1)

Знаете ответ на вопрос?

Сосипатра · Answer 1

Var N: integer;

begin

write ('N = ') ;

readln (N) ;

writeln ('Левая цифра: ', N div 10) ;

writeln ('Правая цифра: ', N mod 10) ;

end.