Дано натуральное число N. Если число содержит 5 цифр, то получить новое число M, которое образуется путем исключения средней цифры исходного числа. Если количество цифр не 5, то M=N.

P. S - решить без использования строковой переменной.

Question

Информатика

Христеня

12 октября, 02:24

Дано натуральное число N. Если число содержит 5 цифр, то получить новое число M, которое образуется путем исключения средней цифры исходного числа. Если количество цифр не 5, то M=N.

P. S - решить без использования строковой переменной.

+5

Ответы (1)

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

Геннадий · Answer 1

Uses crt;

var n, m:integer;

begin

readln (n) ;

if n div 1000>=10 then

m: = (n div 10000) * 1000 + ((n div 1000) mod 10) * 100 + ((n div 10) mod 10) * 10 + (n mod 10)

else m:=n;

writeln (m) ;

end.