| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Центр помощи > [Delphi] Одномерные массивы |
| Автор: Stasya16 14.4.2009, 20:21 |
| Помогите пожалуйста! 1.Посчитать среднее арифметическое положительных элеметов в массиве В(15),созданном с помощью RND.Вывести на форму массив и результат вычисления.Оформление формы произвольное. 2.Посчитаь кол-во положительных,отрицательных и нулевых элементво в массиве С(12).Массив ввести с клавиатуры.Вывести на форму массив в строку и результат вычисления.Оформление формы произвольное. 3.Определить кол-во элементов в массиве P(30),удовлетворяющих условию P(I)<T.Массив ввести с помощью RND.Т ввести с клавиатуры.Вывести на форму результат вычисления.Оформление формы произвольное. 4.В массиве Р(8),введенном с помощью клавиатуры,найти сумму эелементов,стоящих на четных местах.Вывести на форму результат вычисления.Оформление формы произвольное. 5.В массиве Р(8),введенном с помощью клавиатуры,найти произведение эелементов,стоящих на нечетных местах.Вывести на форму результат вычисления.Оформление формы произвольное. 6.В массиве С(10),введенным с помощью клавиатуры,вычислить произведение элементво,стоящих до первого отрицательного элемента.Вывести на форму резыльтат вычисления.Оформление формы произвольное. 7.В массиве М(6),введенным с помощью клавиатуры,найти кол-во четных элементов.Вывести на форму резыльтат вычисления.Оформление формы произвольное. 8.В массиве С(10),введенным с помощью клавиатуры,вычислить сумму элементво,стоящих после первого отрицательного элемента.Вывести на форму резыльтат вычисления.Оформление формы произвольное. |
| Автор: Rodman 15.4.2009, 18:56 | ||
|