Дано трехзначное число вывести на экрвн его первую и последнюю цифру

Question

Информатика

Ируся

29 мая, 01:43

Дано трехзначное число вывести на экрвн его первую и последнюю цифру

+5

Ответы (1)

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

Фелица · Answer 1

Program n1;

var a: integer;

begin

write ('введите целое трехзначное число: ') ;

readln (a) ;

writeln ('вы ввели: ', a) ;

writeln ('первая цифра: ', a div 100) ;

writeln ('третья цифра: ', a mod 10) ;

end.