Var
n,x:integer;
a,b,c:byte;
Begin
read (n);
c:=n div 100 mod 10;
b:=n div 10 mod 10;
a:=n div 1 mod 10;
x:=100*a+10*b+1*c;
write (x);
<span>end.</span>
Города - саки уфа баку, и наверчто тула, если там не тучи а туча слово
реки- урал ока кама волга
слово- майка, корм, балка, папка, губы, лесок, палка, клён, доска, сват, колено
На простых фотоаппаратах изображение фокусируется на плёнку, а в цифровых камерах на матрицу
<u>4 строчка:</u> отсутствует ";"
<u>4 строчка:</u> write вместо writeln, чтобы не было переноса строки (так как считывание данных должно быть в виде:
<em>write();</em>
<em>readln(a);</em>
<u>10 строчка:</u> отсутствует ";"
1. 45
2. 26
3. 88
4. 150
5. 120