ООООчень нужно, пожалуйста!!

Question

язык паскаль

Алексей Илюхин · Accepted Answer

Да ладно?

Наталья Резаева · Answer

понятно

Витаминка · Answer

пффф а язык какой???? асемблер)))

Денис Полоротов · Answer

Очень интересно. А про что?

Максим Гусев · Answer

очень хорощо и всё так не понятно***(((

Лана · Answer

все понятно..

D M G · Answer

аха ща все брошу и начну решать задачки ...

Алексей Буньков · Answer

Если вы не можете помочь, то зачем отвечаете? 
 
Вот, на языке pascal: 
 
program z1; 
uses crt; 
const 
 n=5; 
var 
 chislo:string[5]; 
procedure change(s:string); 
var 
 i,b:integer; 
 x:char; 
begin 
 b:=5; 
 for i:=1 to b do 
 begin 
 x:=s; 
 s:=s; 
 s[b-1]:=x; 
 b:=b-1; 
 end; 
end; 
begin 
 clrscr; 
 writeln('Вводи 5-значное число: '); 
 readln(chislo); 
 change(chislo); 
 writeln(chislo); 
 readkey; 
end.