Даны первый член и разность арифметической прогрессии. Написать рекурсивную процедуру для нахождения
$n$-го члена прогрессии и суммы первых $n$ членов.
Формат входных данных
В первой строке входного файла содержатся 3 целых числа $n$, $1 \le n \le 100$, первый член прогрессии
$a_1$, $\mid a_1 \mid \leq 100$ и разность прогрессии $d$, $\mid d \mid \leq 100$.
Формат выходных данных
Выходной файл должен содержать два числа - $n$-й член прогрессии и сумму первых $n$ членов.
Примеры:
Вход
5 34 -2
Выход
26 150

var n,a1,d,an,s:integer;procedure p(n,a1,d:integer; var an,s:integer);beginif n>1 then begin p(n-1,a1,d,an,s); an:=an+d; s:=s+an; end else begin an:=a1; s:=a1; end;end;beginwriteln('n, a1, d:');readln(n,a1,d);p(n,a1,d,an,s);writeln('an = ',an,' s = ',s);end.Пример:n, a1, d:5 34 -2an = 26 s = 150