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

Question

Асаф

22 августа, 17:44

+5

Ответы (1)

Знаете ответ?

Викул · Answer 1

Var N: integer;

begin

write ('N = ') ;

readln (N) ;

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

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

end.