Наименьшее общее кратное из файла |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Наименьшее общее кратное из файла |
dog |
11.09.2010 20:16
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 17 Пол: Женский Репутация: 0 |
Задача:
С клавиатуры вводится N целых чисел (из интервала [10; 100]). Требуется 1. записать все введенные числа в файл 2. открыть файл и вывести на экран все записанные в него числа (в строку) 3. найти наименьшее общее кратное компонентов, в записи которых нет цифры k. примечание: массивы в программе не использовать
Первые два пункта вообще никаких проблем, выделить числа не содержащие k тоже никакой проблемы, а вот найти наименьшее общее кратное без создания массива ??? |
volvo |
11.09.2010 21:26
Сообщение
#2
|
Гость |
Цитата а вот найти наименьшее общее кратное без создания массива ??? А зачем тебе для нахождения НОК нескольких чисел понадобился массив? Вообще-то NOK(a, b, c) = NOK(NOK(a, b), c) ... Этого достаточно, чтобы посчитать кратное для любого количества чисел безо всяких массивов. |
sheka |
11.09.2010 21:46
Сообщение
#3
|
Я. Группа: Пользователи Сообщений: 809 Пол: Мужской Реальное имя: Саша Репутация: 11 |
Можно так:
все работает чики-пики. Сообщение отредактировано: sheka - 11.09.2010 21:48 |
Lapp |
11.09.2010 22:51
Сообщение
#4
|
Уникум Группа: Модераторы Сообщений: 6 823 Пол: Мужской Реальное имя: Лопáрь (Андрей) Репутация: 159 |
CurrNOK:=1; //просто потому, что меньше 10 Sheka, что ты имел в виду под этим комментом? при чем тут <10?Добавлено через 3 мин. Цитата все работает чики-пики. Держи ложку дегтя . числа: 2, 3 цифра k=0 твой ответ, если не ошибаюсь, будет равен NOK=1? Добавлено через 2 мин. нет, дела еще хуже.. (( числа: 1,2,3,4,5,6,7,8,9 k: 1 NOK=9 ??? Зачем вообще проверка на <10 ? -------------------- я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой |
sheka |
12.09.2010 1:27
Сообщение
#5
|
Я. Группа: Пользователи Сообщений: 809 Пол: Мужской Реальное имя: Саша Репутация: 11 |
Ага.
Цитата С клавиатуры вводится N целых чисел (из интервала [10; 100]). + из кода Цитата IF (n <=10) OR (n >=100) THEN BREAK; т.е. я здесь чтобы не вводить лишнюю логическую переменную использовал ограничения условия задачи. Единственное что может быть, так это то, что автор не предусмотрел того случая, если ни одно из введеных чисел не удовлетворяет ВСЕМ условиям. Хотя.. Как раз эту проверку надо вставлять в том куске кода, который написал я . Ну я думаю ТС это сделает, да?Добавлено через 2 мин. я бы инициализировал CurrNOK как "Восемь с половиной миллионов" - любимое число моего преподавателя математики, но, к сожалению, integer.. |
Lapp |
12.09.2010 7:26
Сообщение
#6
|
Уникум Группа: Модераторы Сообщений: 6 823 Пол: Мужской Реальное имя: Лопáрь (Андрей) Репутация: 159 |
Да, все верно, зря я воду намутил )). Невнимательно читал условие, сорри.
Извиняюсь. -------------------- я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой |
Lapp |
13.09.2010 3:26
Сообщение
#7
|
Уникум Группа: Модераторы Сообщений: 6 823 Пол: Мужской Реальное имя: Лопáрь (Андрей) Репутация: 159 |
sheka +1
от dog и просто ответа (не говоря про "спасибо") фиг дождешься. Живые собаки гораздо багодарнее... -------------------- я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой |
Текстовая версия | 28.04.2024 7:01 |