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

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

Question

Информатика

Юна

25 ноября, 02:42

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

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

+2

Ответы (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.