Вопрос по программированию Pascal Поменять местами цифры трехзначного числа и вывести их...

Question

Вопрос по программированию Pascal
Поменять местами цифры трехзначного числа и вывести их на экран

Comments

Какие именно цифры менять местами?

---

любые

---

Разбей число на десятки, сотки и единицы путем деления на 10 и 100, а потом выводи их в порядке, в котором нужно. Например: 324 div 100 = 3 - количество соток в числе и т.д., это очень легко

Answer 1

Var a,b,c,d:integer;
begin
randomize;
a:=random(990)+10;
writeln(a);
b:=a div 100;
c:=a mod 10 ;
writeln('Первое цифра числа - ',b);
a:=a div 10;
d:=a mod 10;
writeln('Вторая цифра числа - ',d);
writeln('Третья цифра числа - ',c);
writeln(b,c,d);
end.

---