0 / 0 / 0
Регистрация: 01.03.2010
Сообщений: 3
|
|
1 | |
4 программы на одномерные массивы.06.06.2011, 14:22. Показов 3738. Ответов 2
Метки нет (Все метки)
Здравствуйте.
Есть 4 задачи, 2 простые, 2 посложнее. Надеюсь на вашу помощь по поводу первых двух простых задач. За задачи посложнее готов заплатить, только не смог найти соответствующий раздел. Если подскажете, буду благодарен. Задачи ниже. 1. С клавиатуры вводится длина одномерного массива и его элементы. Подсчитать и вывести количество элементов, которые делятся на 5. 2. С клавиатуры вводится длина одномерного массива и его элементы. Составить новый массив с суммой нечетных цифр каждого элемента исходного массива. Следующие две задачи вроде как сложнее, а может быть такие же простые как и первые две. 1. Вводится размер одномерного массива A(N) и его элементы. Удалить из исходного массива все элементы, у которых сумма всех делителей меньше 15. Результат вывести на экран. 2. Вводится размер двумерного массива A(N,M) и его элементы. Составить одномерный массив, содержащий номера столбцов, в которых все элементы кратны 5. Полученный массив вывести на экран. Заранее благодарю!
0
|
06.06.2011, 14:22 | |
Ответы с готовыми решениями:
2
одномерные массивы Одномерные массивы одномерные массивы одномерные массивы |
38 / 38 / 18
Регистрация: 16.05.2011
Сообщений: 139
|
|
06.06.2011, 14:50 | 2 |
1)
Код
uses crt; var a:array[1..50] of integer; i,n,s:integer; begin clrscr; write('Размер массива:'); readln(n); for i:=1 to n do begin write('A[',i,']='); readln(a[i]); if a[i] mod 5 = 0 then s:=s+1; end; write('Количество элементов, которые делятся на 5: ',s); readln; end.
0
|
0 / 0 / 0
Регистрация: 01.03.2010
Сообщений: 3
|
|
06.06.2011, 19:17 [ТС] | 3 |
Спасибо. Подскажите где раздел на платное изготовление задач?
0
|
06.06.2011, 19:17 | |
06.06.2011, 19:17 | |
Помогаю со студенческими работами здесь
3
Одномерные массивы. Одномерные Массивы. Одномерные массивы Одномерные массивы Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |