Сделайте пожалуйста программу в Паскале! Задание:Дано трехзначное число.Вывести число, полученное при перестановке цифр сотен и
Сделайте пожалуйста программу в Паскале!
Задание: Дано трехзначное число.Вывести число, полученное при перестановке цифр сотен и десятков исходного числа (например, 123 перейдет в 213) <span> </span>
Program u4i_div_and_mod; var a,b,c,z,x,v:integer; begin readln(a); z:= a div 100;{1} x:= a mod 100;{23} c:= x mod 10; {3} v:= x div 10;{2} writeln(v,z,c); readln; <span>end.</span>