18 / 18 / 1
Регистрация: 04.12.2010
Сообщений: 60
|
||||||
1 | ||||||
Заменить в списке все элементы, равные 0, на -1 и найти сумму положительных элементов списка10.12.2010, 23:13. Показов 4179. Ответов 5
Метки нет (Все метки)
Ребята, помогите пожалуйста! Написать программу для замены в списке всех элементов, равных 0, на -1 и найти сумму положительных элементов списка.
Я понимаю, что нужно делить список на голову и хвост и проверять равен ли элемент нулю,если равен то заменяем, нет идем дальше. И потом делаем вывод списка, который получился. Потом так же делим на голову и хвост и проверяем если элемент больше нуля, то склыдываем элементы. И выводим сумму. Мне сложно написать правила для осуществления программы.Помогите пожалуйста.
если есть похожее,то напишите как найти.у меня не получилось.
0
|
10.12.2010, 23:13 | |
Ответы с готовыми решениями:
5
Удалить из списка все элементы, равные последнему; найти длину полученного списка Найти сумму положительных элементов и заменить их противоположными В матрице (m x n) все элементы, равные единице, заменить суммой положительных элементов той строки Заполнить массив В(3,4) случайным образом. Найти сумму положительных элементов. Все отрицательные элементы заменить на 0 |
Українець
424 / 318 / 16
Регистрация: 26.09.2009
Сообщений: 844
|
||||||
10.12.2010, 23:57 | 2 | |||||
1
|
2505 / 1480 / 37
Регистрация: 14.09.2009
Сообщений: 2,740
|
|
11.12.2010, 00:43 | 3 |
У Вас в предикате summa не предусмотрено правило на случай, если голова списка будет не больше 0.
0
|
18 / 18 / 1
Регистрация: 04.12.2010
Сообщений: 60
|
||||||
11.12.2010, 01:08 [ТС] | 4 | |||||
спасибо большое
Добавлено через 23 минуты ой,скажите пожалуйста в чем ошибка - почему сумма на экран не выводится в этой программе:
эта программа работает правильно,тока надо было поставить nl между этими словами write(T1),summa(T1,0,E),
0
|
Українець
424 / 318 / 16
Регистрация: 26.09.2009
Сообщений: 844
|
|
11.12.2010, 01:58 | 5 |
Х - это сумма в моем предикате
1
|
18 / 18 / 1
Регистрация: 04.12.2010
Сообщений: 60
|
||||||
11.12.2010, 02:40 [ТС] | 6 | |||||
Спасибо,я что то не подумала и решила написать еще один предикат...
вот готовая программа
1
|
11.12.2010, 02:40 | |