Размещено 6 лет назад по предмету
Информатика
от dshalabaev123
Что вычисляет представленная программа, если n – натуральное число?
var n, a, b: integer;
begin
readln(n);
b:=0;
while n<>0 do
begin
a:=n mod 10;
n:=n div 10;
b:=b+a;
end;
writeln(b);
end.
Количество цифр в числе n.
Сумму цифр числа n.
Произведение цифр числа n.
Первую цифру числа n.
Знакочередующую сумму цифр числа n.
Перевернутое в обратном порядке число n.