Консультация № 48828
11.07.2006, 14:57
0.00 руб.
0 2 1
Здравствуйте!!! Надо решить задачу:
Вывести на экран один из рядков формулы:

2*4*…*N
S= для заданного натурального числа N;
1*3*…*N
Первый рядок вводится, если N – парное; второй – если N – непарное.

Если непонятнa запись в формуле – обратитесь по этой ссылке http://interestingall.narod.ru/delete/proga2.jpg

Обсуждение

Неизвестный
11.07.2006, 15:20
общий
это ответ
Здравствуйте, ataman!

Нужный код в приложении.

Удачи!!!

Приложение:
var i,N:integer;begin write(‘N=‘); readln(N); if (n mod 2=0) then i:=2 else i:=1; write(‘S=‘,i); while i<N do begin i:=i+2; write(‘*‘,i); end; readln;end.
Неизвестный
11.07.2006, 17:38
общий
Немного оптимизации: if (n mod 2=0) then i:=2 else i:=1; заменить на i := (2- n and 1);Неочевидно, зато быстро :-)i:=i+2; заменить на inc(i, 2);Сомневаюсь, что быстрее, зато смотритя хорошо =)
Форма ответа