Используя рекурсивную процедуру и функцию....

@beka91 · Регистрация: 13.12.2009

Используя рекурсивную процедуру и функцию, составьте программу решения следующей задачи:1+3+5+7+9+...

@yamilramilev · 19.10.2010, 14:48

До какого то N? И это N четное? Или это определять в ходе программы?

@Puporev · 19.10.2010, 14:57

Pascal

uses crt;
function Summa(n:integer):integer;
begin
if n=1 then Summa:=1
else Summa:=Summa(n-1)+2*n-1;
end;
var n:integer;
begin
clrscr;
write('n=');
readln(n);
write('Сумма=',Summa(n));
readln
end.

@beka91 0 / 0 / 0 Регистрация: 13.12.2009 Сообщений: 50
		1
	Используя рекурсивную процедуру и функцию.... 19.10.2010, 14:35. Показов 1292. Ответов 2 Метки нет (Все метки) Используя рекурсивную процедуру и функцию, составьте программу решения следующей задачи:1+3+5+7+9+... __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

@yamilramilev 267 / 258 / 47 Регистрация: 08.10.2009 Сообщений: 554
	19.10.2010, 14:48	2
	До какого то N? И это N четное? Или это определять в ходе программы? 0

Опции темы

Используя рекурсивную процедуру и функцию....

Решение