1. 

   masters New Member

   Дано пятизначное число получить новое число трехзначное путем удаления единиц и сотен затем получить число обратное 3-ому. пример12345..124...421

    

   masters, 31 мар 2010

   #1
2. 

   Pipetka New Member

   var
   n:integer;
   begin
   readln(n);
   n:= n div 10;
   n:=(n div 100)*10 +n mod 10;
   writeln(n);
   n:= (n mod 10)*100+ ((n mod 100) div 10)*10+ n div 100;
   writeln(n);
   end.

    

   Pipetka, 31 мар 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня