|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
12.01.2008, 11:43 | #1 |
Пользователь
Регистрация: 14.10.2007
Сообщений: 25
|
возрат суммы
Помогите пожайлуста разобратся с этой задачей. Описать функцию, которая возвращает сумму К=1,2,… наименьших цифр, входящих в запись числа типа Longint . Вот код только помоему он неправильно считает. Тут мне кажется вся проблема в К она поидее должна описыватся в var.
Код:
|
12.01.2008, 12:39 | #2 |
Пользователь
Регистрация: 14.10.2007
Сообщений: 25
|
Вот я изменил программу . только тут нужно вычесть максимальный элемент. Только тут нужно сделать так чтоб выводилась сразу сумма. А сумма минимальных находится просто сложением без максимального чмсла, тюею не нужно задавать какое именно кол-во минимальных цифр нужно порлучить
Код:
|
12.01.2008, 12:56 | #3 | |
Пользователь
Регистрация: 08.12.2007
Сообщений: 32
|
я что та не совсем условие задачи понял... надо найти просто сумму массива или как?...и что значит
Цитата:
|
|
12.01.2008, 13:04 | #4 |
Пользователь
Регистрация: 14.10.2007
Сообщений: 25
|
это число должно находится в приделах longint это от -2147483648 до +217483647. а задание сводится к тому чтоб сложить все элементы кроме максимального. например 1236412 максимальный элемент 6 значит складываем 1+2+3+4+1+2=12 и должно выводится сумма наименьших равна 12
|
12.01.2008, 13:13 | #5 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Тебя как всегда трудно понять. В первом коде у тебя несколько ошибок, в том числе и та о которой ты подумал, раздел переменных всегда идет раньше раздела описантя подпрограмм. Очень запутана и налогична сама функция. Вот как можно решить твое первое условие. Посмотри структуру кода, разберись и сам исправишь все свои ошибки.
Код:
|
12.01.2008, 13:23 | #6 |
Пользователь
Регистрация: 14.10.2007
Сообщений: 25
|
а со вторым кодом что нужно сделать?
|
12.01.2008, 13:25 | #7 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Во втором случае добавляешь в функцию вместо сортировки поиск максимального элемента
Код:
Код:
|
12.01.2008, 14:03 | #8 |
Пользователь
Регистрация: 14.10.2007
Сообщений: 25
|
Вот что получилось только выдаёт ошибку.
Код:
|
12.01.2008, 14:53 | #9 | |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Ты понял, что здесь написал?
Цитата:
Убери for j:=1 to n-1 do for i:=1 to n-j do begin if m[i]>m[i+1] then begin end; |
|
12.01.2008, 15:04 | #10 |
Пользователь
Регистрация: 14.10.2007
Сообщений: 25
|
У меня всёравно выдаётся ошибка "(" expected той строке get_sum:=s-m[imax];
Код:
Последний раз редактировалось 11111; 12.01.2008 в 16:14. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Поиск суммы | Janette | Помощь студентам | 2 | 24.02.2008 12:56 |
Поиск суммы | Janette | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 23.02.2008 21:39 |
Нахождение суммы в массиве. PHP | Айвенго | Помощь студентам | 3 | 28.01.2008 19:46 |
Паскаль и суммы | SEREG@ | Помощь студентам | 6 | 18.12.2007 21:11 |
StringGrid, вычисление суммы | Gorin | Компоненты Delphi | 5 | 23.08.2007 19:44 |