|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
02.05.2009, 18:58 | #1 |
Регистрация: 25.04.2009
Сообщений: 8
|
Сложная задачка
Всем привет, нуждаюсь в вашей помощи.
Условие: Дан файл f, элементы которого являются действительными числами. Найти наибольшее из значений элементов. Заранее очень благодарен... |
02.05.2009, 19:04 | #2 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
И что сложного? В чем, собственно, проблема?
Что непонятно и что не получается? Читаете файл поэлементно и сравниваете с максимумом.
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
02.05.2009, 20:19 | #3 |
Регистрация: 25.04.2009
Сообщений: 8
|
Ну каждому своё
А мне сложновато |
02.05.2009, 20:24 | #4 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
_°PROTOS°_, так пробуйте. Откуда взяться сложностям, если вы даже не начали?
Что вам конкретно непонятно?
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
03.05.2009, 00:35 | #5 |
Пользователь
Регистрация: 02.05.2009
Сообщений: 13
|
program maxmas;
const t = 10; var f: text; d,max: integer; n: array [1..t] of integer; Begin Assign(f, '....'); reset(f); repeat inc(d); read(f,n[d]); until EoF(f); for d:= 1 to t do if n[d] > max then max:= n[d]; writeln(max); end.
Не всё так сложно, как кажется...
Помог - ставь плюсег |
03.05.2009, 15:17 | #6 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Lawless, в целом всё правильно.
Только несколько замечаний. 1) файл (по условию задачи) должен быть var f : file of real; 2) совсем не зачем считывать весь файл в массив! При чтении очередного элемента надо сразу сравнивать его с максимальным. Это будет и быстрее и сразу снимает ограничение на размер файла (ну, как в вашем примере - 10 чисел). 3) переменную Max перед циклом ОБЯЗАТЕЛЬНО нужно иницилизировать (для этого можно взять заведомо маленькое число, ну, например, Max := -1e38; 4) для чтения из файла лучше использовать конструкцию: Код:
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сложная задача | asale | Microsoft Office Excel | 6 | 07.04.2009 20:36 |
Не сложная задачка. Нужна помощь в решении | Buker | Microsoft Office Excel | 1 | 03.04.2009 00:23 |
вот задачка на массив не сложная.я написал но не хочет рабатать что то | BERT | Помощь студентам | 4 | 10.03.2009 18:23 |
сложная для мну задачка..помогите плиз! | лиса | Помощь студентам | 11 | 15.01.2007 07:31 |
Сложная программа | Виктория | Помощь студентам | 2 | 03.12.2006 00:30 |