Вопрос Составьте текст программы, содержащей две функции (рекурсия) Паскаль

[huckerHD]

Составьте текст программы, содержащей две функции:
1. функцию сложения двух чисел, используя только прибавление
единицы, реализованную с помощью циклов;
2. функцию сложения двух чисел, используя только прибавление
единицы, реализованную с помощью рекурсии;
Проверить работу каждой функции

 

[ananasqq]

уже бегу исполнять, большой белый хозяин...

 

[Пельменьчег]

примерно так Sum(a,b:integer):integer; begin if b=0 then sum:=a else sum:=sum(a,b-1)+1; end