Запишите на языке паскаль программу которая для произвольного натурального двузначного числа определяет a) сумму и произведение его цифр б) число, образованное перестановкой цифр исходного числа

Var   n,d,e: integer; begin   write('введите двухзначное число: '); read(n);   d: =n div 10; e: =n mod 10;   writeln('сумма цифр равна ',d+e,', произведение ',d*e);   writeln('число, полученное перестановкой цифр ',10*e+d) end. тестовое решение: введите двухзначное число: 29 сумма цифр равна 11, произведение 18 число, полученное перестановкой цифр 92

А)  program sum_pr; var sum,pr,a1,a2,a : integer; begin read(a); a1: =a div 10; a2: =a mod 10; sum: =a1+a2; pr: =a1*a2; write(sum,pr); end. б) program per; var per,a1,a2,a : integer; begin read(a); a1: =a div 10; a2: =a mod 10; per: =a2*10+a1; write(per); end.

хотелось бы напомнить, что с=12, f=15, а=10.

имеем:

20с7f_16 = 2·16⁴ + 0·16³ + 12·16² + 7·16¹ + 15·16⁰ = 2·65536 + 12·256 + 7·16 + 15 = 131072 + 3072 + 112 + 15 = 134271_10(f3ao6/4)_16 = (15·16⁴ + 3·16³ + 10·16² + 0·16¹ + 6·16⁰)/4 = (15·65536 + 3·4096 + 10·256 + 6)/4 = (983040 + 12288 + 2560 + 6)/4 = 997894/4 = 249473,5 _10

канал - 5букв

телевизор,компьютер 9букв

крик - 4буквы