program t5p4n5;
var d,n,m,k,c,e,f,k1: integer;
begin
writeln ('vvedit chislo');
readln (n);
m:=n;
k:=1;
d:=1;
repeat
m:=m div 10;
k:=k*10;
until m=0;
k1:=k div 10;
c:=(m div k1)+2;
e:=(m mod 10)+2;;
f:=(((c*k)+n)*10)+e;
writeln (f);
readln
end.
| Головна | Реєстрація | Вхід | RSS | Середа, 01.14.2026, 9:53 AM |
Довідник для учнів та студентів | |
| Вітаю Вас Гость |
|
тема 5 пункт 4 №5 |
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| Guide-for-students © 2026 |
| Створити безкоштовний сайт на uCoz |