Все тот же Pascal...

Savant · Отправлено: **20:36, 16-01-2005** | #2

Doktor
Ну держи своё решение. Протестишь, напиши.
Предупреждаю: на коленке писал

Savant · Отправлено: **20:41, 16-01-2005** | #3

Да, еще вопрос:

Цитата Doktor:

Написать программу нахождения суммы нечетных элементов массива.

Нечетный элемент - это ....
... элемент массива, порядковый номер которого нечетный или
... элемент массива, значение которого - нечетное число.

Я посчитал за второе и на основе этого написал решение. Проясни эту ситуацию.

Doktor · Отправлено: **20:44, 16-01-2005** | #4

Спасибо большое...))) Все работает...))
Но я все же понаглею.... )))
Прости, но мне надо эти 3 задачи в отдельных проэктах...

и еще нашел:
Тема: Оператор цикла с постусловием.
Дано натуральное число n. Вычислить:
P = (1 - 1/2*2 )(1 - 1/3*3 )*…*(1 - 1/n*n ), где n>2

2*2 - это 2 в квадрате
3*3 - 3 в квадрате
n*n - n в степени n... .
Спасибо большое тебе, но помоги еще раз...

Doktor · Отправлено: **20:46, 16-01-2005** | #5

Цитата:

Да, еще вопрос:

Да, ты правильно понял, спасибо!
Это именно элемент массива, значением которого являектся нечетное число!

Savant · Отправлено: **20:57, 16-01-2005** | #6

Ну вот...

Добавлено:
Архив с исходниками лежит уже исправленный (см. описание ошибки ниже)

Doktor · Отправлено: **20:59, 16-01-2005** | #7

Спасибо, уважаемый...))) сдам, отвечу сюда что да как....

Млин... Ты не в Уфе живешь ??? а то бы отблагодарил!

Savant · Отправлено: **21:01, 16-01-2005** | #8

Москва

Savant · Отправлено: **21:09, 16-01-2005** | #9

Млин, ошибка в Zad_4.pas

Я так и чувствовал, когда тестил, что что-то там не так
Замени while n>2 do begin на while n>1 do begin

Надеюсь меня услышат!!!