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

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

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.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.