|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
21.12.2010, 23:11 | #1 |
Пользователь
Регистрация: 05.12.2010
Сообщений: 31
|
Pascal вывод минимального значения
задан вектор А и В из n элементов n>=50. Найти наибольшие элементы и вывести на экран самое маленькое число
program v4; type vector=array [1..50] of real; var A:vector; b,c,n,i:integer; min,t:real; begin writeln('vvedite n'); readln(n); for i:=1 to n do readln (a[i]); min:=(a[i]); for i:=1 to n do if a[i]<min then min:=a[i]; repeat for i:=1 to 50 do if a[i]>0 then begin t:=a[i]; t:=i+1; end; until t:=n+1; writeln ('perv pol =',t); writeln ('minim=',min); readln; end. по моему в ноль не праавельно, помогите исправить |
21.12.2010, 23:29 | #2 |
Участник клуба
Регистрация: 03.12.2009
Сообщений: 1,013
|
где потерял условие выполнения until ?
|
21.12.2010, 23:33 | #3 |
Участник клуба
Регистрация: 03.12.2009
Сообщений: 1,013
|
И вопрос по условию
что значит найти наибольшие элементы? по отношению к чему их искать? |
21.12.2010, 23:53 | #4 |
Пользователь
Регистрация: 05.12.2010
Сообщений: 31
|
сам условие до конца понять не могу, мутное какое то
|
21.12.2010, 23:59 | #5 |
Участник клуба
Регистрация: 03.12.2009
Сообщений: 1,013
|
С минимальным все ясно, наверное требуется найти наибольшие по отношению к минимальному, или же опечатались и требуется найти мин и макс, но что-то как-то слишком уж большая опечатка получается
|
22.12.2010, 00:01 | #6 |
Форумчанин
Регистрация: 23.09.2010
Сообщений: 682
|
Что здесь непонятного? Ищем максимальные элементы в первом и втором массиве и находим среди этих двух максимальных минимальное и усё
P.S. наверное
Проще всего признать свою ошибку.
Гораздо труднее еЁ осознать и исправить. |
22.12.2010, 00:08 | #7 |
Участник клуба
Регистрация: 03.12.2009
Сообщений: 1,013
|
Да) Все верно) Упустил я по условию что дан второй массив ))
|
22.12.2010, 00:10 | #8 |
Пользователь
Регистрация: 05.12.2010
Сообщений: 31
|
а тогда все в корень не правильно?
|
22.12.2010, 00:11 | #9 |
Пользователь
Регистрация: 05.12.2010
Сообщений: 31
|
я что то вообще не могу понять как исправить
|
22.12.2010, 00:16 | #10 |
Форумчанин
Регистрация: 23.09.2010
Сообщений: 682
|
Делайте по новому.
Алгоритм поиска максимального элемента: Код:
Проще всего признать свою ошибку.
Гораздо труднее еЁ осознать и исправить. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Запрос на вывод минимального оклада? | SpiderHulk | Microsoft Office Access | 7 | 10.06.2010 14:29 |
поиск ближайшего минимального значения на sql | nuevegramodelamor | Помощь студентам | 7 | 11.05.2010 20:21 |
Вывод значения | Прохор | Microsoft Office Access | 1 | 04.05.2010 23:37 |
Вывод максимального, минимального и среднего значение по Listbox | Klim Bassenger | Microsoft Office Excel | 3 | 29.06.2009 18:38 |
правильно написать формулу нахождения минимального значения из диапазона чисел в строке | Legame | Microsoft Office Excel | 14 | 01.03.2009 22:29 |