Залано целое число меньше тысячи, используя div и mod выведите на экран его последнюю и первую циФру

Question

Информатика

Маля

15 мая, 04:10

Залано целое число меньше тысячи, используя div и mod выведите на экран его последнюю и первую циФру

+1

Ответы (1)

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

Лена · Answer 1

Var

n: integer;

begin

readln (n) ;

writeln ('Последняя цифра: ', n mod 10) ;

while n > 9 do

n : = n div 10;

writeln ('Первая цифра: ', n) ;

end.