Помогите советом или решением задач |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Помогите советом или решением задач |
Dan1L |
Сообщение
#1
|
Группа: Пользователи Сообщений: 1 Пол: Мужской Реальное имя: Данил Репутация: 0 |
Здраствуйте
Помогите советом или решением задач 1 Задача звучит так - Создать функцию возвращаюсию итый элемент ряда фибаначи Подскажите 1. Что такое ряд фибаначи 2 И через что проще решать задачку 2 задача Найти 2ва целых трехзначных числа частное каторое ближе к числу Pi Решение есть program p1; uses crt var A B C D word Begin C:=1 D:=1 for a:=100 to 999 do for b:=100 to 999 do if (abs(A/b-pi)<(abs(C/D-pi))) then begin C:=A D:=B End; Вопрос такой почему С и D сначала присваивают имено значение 1 3 Задача Вывести на экран n удивительных чисел вопрос: что такое удивительные числа и какого они типа 4 задача Создать программу реалезующую осн. операц списков в виде функций и процедур. |
Текстовая версия | 8.05.2024 10:19 |