Question

Составте программу , вычисления суммы цифр трёхзначного числа а. Значение а введите с клавиатуры

Пример ввода:

375

Пример вывода:

Сумма цифр числа 375 равна 15

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

Пример ввода:

375

Пример вывода:

573

Answer 1

var

a:integer;

begin

readln(n);

writeln('Сумма цифр числа ',a,' равна', a div 100+(a mod 100) div 10 +a mod 10);

end.

 

var

a:integer;

begin

readln(n);

writeln((a mod 10)*100+((a mod 100) div 10)*10 +a div 100);

end.