Паскаль! составить программу: 1)вводим любое четырехзначное число. в результате выполнения программы на экране такая запись: в числе - тысяч - сотен -десятков - единиц в скобках < > указаны переменные, сами скобки обозначают - в этом месте. 2)ввести с клавиатуры трехзначное число. определить сумму его цифр (переменная sum) и вывести эти цифры в обратном порядке. в результате выполнения программы на экране такая запись: в числе - сотен -десятков -единиц в скобках < > указаны переменные, сами скобки обозначают - в этом месте

// pascalabc.net 3.1, сборка 1219 от 16.04.2016 begin   var n: =readinteger('введите четырехзначное число');   writeln('в числе');   writeln(n div 1000,' - тысяч');   writeln((n div 100) mod 10,' - сотен');   writeln((n mod 100) div 10,' - десятков');   writeln(n mod 10,' - единиц') end. тестовое решение: введите четырехзначное число 4072 в числе 4 - тысяч 0 - сотен 7 - десятков 2 - единиц // pascalabc.net 3.1, сборка 1219 от 16.04.2016 begin   var n: =readinteger('введите трехзначное число');   var s: =n div 100;   var d: =(n div 10) mod 10;   var e: =n mod 10;   writeln('sum=',s+d+e);   writeln(e,d,s);   writeln('в числе');   writeln(e,' - сотен');   writeln(d,' - десятков');   writeln(s,' - единиц') end. тестовое решение: введите трехзначное число 492 sum=15 294 в числе 2 - сотен 9 - десятков 4 - единиц

А)  1000   − 11   =  101б)  10011   + 1011   = 11 110в)  101   ×  101   = 11 001