Составте программу, вычисления суммы цифр трёхзначного числа а. Значение а введите с клавиатуры Пример ввода: 375 Пример вывода: Сумма цифр числа 375 равна 15 2) Составте программу, которая получает 'перевёртыш' трёхзначного числа а. Значение а введите с клавиатуры Пример ввода: 375 Пример вывода: 573

program summ_invers;

var n, n1, n2, n3: integer;

begin

writeln ('Введите трехзначное число');

readln (n);

n1 : = n div 100;

//целочисленное деление на 100 равно числу сотен

n2 : = (n mod 100) div 10;

//целочисленное деление на 10 остатка от деления числа на 100

//равно числу в разряде десятков

n3 : = n mod 10;

//остаток от деления числа на 10 равен числу единиц

writeln ('Сумма цифр числа ', n, ' равна ', n1 + n2 + n3);

writeln ('Перевертышем числа ', n, ' будет число ', n3 * 100 + n2*10 + n1);

end.