Var a:integer;
begin
readln(a);
while(a<>0) do begin
write(a mod 10);
a:=a div 10;
end;
<span>end.</span>
Вставил прогу в паскаль он сам все считает
2) 50
3) 56
4) 55
5) 243
6) 35
7) 64
<span>ЭТО называется: "инструментальные средства разработки", стыдно не знать.
</span>