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

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

375

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

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

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

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

375

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

573

Question

Информатика

Евдокиюшка

19 августа, 21:18

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

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

375

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

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

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

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

375

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

573

+4

Ответы (1)

Знаете ответ на вопрос?

Лизура · 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.