Пример 6. Составим функцию, которая вычисляет сумму цифр числа. Будем рассуждать так: сумма цифр числа n равна значению последней цифры плюс сумма цифр числа div(n, 10). Сумма цифр однозначного числа равна самому этому числу, это условие окончания рекурсии. Получаем следующую функцию:


function sumDig(n:integer):integer;

var sum: integer;

begin

sum:=n mod 10;

if n>=10 then

sum:=sum+sumDig (n div 10);

sumDig:= sum

end;

Нужно максимально понятно обьяснить, как так получилось. 10 класс, Паскаль
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Copyright © 2024 SCHOLAR.TIPS - All rights reserved.