| Waeman12 | Дата: Воскресенье, 04.12.2011, 01:09 | Сообщение # 1 |
|
Новичок
Группа: Пользователи
Сообщений: 2
Статус: Offline
| Вроде бы, все оформил по правилам...
Задали две задачи на массивы. Думаю, для модераторов данного форума это детский сад 
1. В массиве целых чисел b1, b2, ..., b15 найти сумму модулей отрицательных чисел.
2. Известно, что в массиве а1, а2, ..., а8 количество отрицательных чисел равно количеству положительных. Составить новый массив так, чтобы чередовались положительные и отрицательные числа.
Заранее спасибо)
Буду очень признателен, если алгоритм второй задачи напишите от начала до конца
Сообщение отредактировал Waeman12 - Воскресенье, 04.12.2011, 03:37 |
| |
| |
| Seqular | Дата: Четверг, 08.12.2011, 17:39 | Сообщение # 2 |
 Хранитель
Группа: Администраторы
Сообщений: 859
Статус: Offline
| Waeman12,
s := 0;
for i := 1 to 15 do
begin
if (b[i] < 0) then s := s + abs(b[i]);
end;
выводим s и всё. Это первая. Вторую пока думаю. Интересная.
Поддерживаю также проект сообщество молодых сисадминов
|
| |
| |
