|
|
|
| Другие темы раздела | |
|
Turbo Pascal Найти среднее арифметическое значение положительных элементов
https://www.cyberforum.ru/ turbo-pascal/ thread965927.html Дан целочисленный линейный массив на N элементов. Найти среднее арифметическое значение положительных элементов. Если таких элементов не существует, то вывести ноль. Входные данные: В первой строке входного потока дано единственное целое число N (0 < N < 32767) Во второй строке перечисленны значения элементов массива по модулю не превышающие 32767. Выходные данные: В выходной... |
Найти количество отрицательных элементов массива Turbo Pascal Дан линейный вещественный массив на N элементов. Найти количество отрицательных элементов массива. Входные данные: Во входном потоке в первой строке дано единственное целое число N (0 < N < 32767) Во второй строке через пробел перечисленны N вещественных чисел, значения которых по модулю не превышают 100000. Выходные данные: В выходной поток вывести единственное целое число. |
|
Turbo Pascal Найти сумму всех элементом массива
https://www.cyberforum.ru/ turbo-pascal/ thread965917.html Дан линейный массив на N элементов. Найти сумму всех элементом массива. Входные данные: Во входном потоке в первой строке дано единственное целое число N (0 < N < 32767) Во второй строке через пробел перечисленны значения элементов массива. Значения элементов - вещественные числа, по модулю не превосходящие 100000. Выходные данные: В выходной поток вывести единственное... |
Turbo Pascal Задача ЛП симплекс методом
https://www.cyberforum.ru/ turbo-pascal/ thread965889.html Z(X)=2x1+3x2-x3+4x4-min 2x1+3x2+0x3+7x4=21 -x1-2x2+x3-5x4=-12 Xj>0, j=1,2,3,4 Нужно на Паскале, помогите кто может Из инета: program simple_sim; {$APPTYPE CONSOLE} |
|
Составить блок-схему к алгоритму решения выражения Turbo Pascal Помогите составить блок-схему к алгоритму решения данного выражения : a-b/a^2+1 2 курс. Знаю, что банально. В блок-схемах постоянно путаюсь и часто допускаю глупые ошибки. Заранее спасибо! |
Turbo Pascal Найти номер последнего по порядку столбца матрицы, содержащего наименьшее число букв r, p
https://www.cyberforum.ru/ turbo-pascal/ thread965809.html дана символьная матрица mxn найти номер последнего по порядку столбца содержащего наименьшее число букв r,p |
| Turbo Pascal Определить размер оплаты по больничному листу работника, Определить размер оплаты по больничному листу работника, проболел К дней, оклад которого составляет 800 грн. в месяц. Кол-во рабочих дней в месяце составляет 20 дней. При этом учесть, что оплата производится в зависимости от стажа работы таким образом: -При стаже работы до 3 лет - 50% заработка; -От 3 до 5 лет - 60%; -От 5 до 8 лет - 80%; -От 8 и более - 100% Добавлено через 19 минут... https://www.cyberforum.ru/ turbo-pascal/ thread965790.html |
Turbo Pascal Вычислить значение выражения Здравствуйте! Помогите, пожалуйста, написать программу через оператор FOR для задания: программный код через оператор while не работает корректно. не совпадает результат с экселем var x, y, a: real; i: integer; begin writeln('x ='); |
| Turbo Pascal При организации процедуры код перестает работать Ув. программисты подскажите пожалуйста в чем проблема... Есть код программы: uses crt; type mas = array of string; var st: string; m: mas; i, j: integer; begin clrscr; write('Input string: '); https://www.cyberforum.ru/ turbo-pascal/ thread965734.html |
Turbo Pascal Найти рекуррентную форму для явно заданной функции и разработать программный код
https://www.cyberforum.ru/ turbo-pascal/ thread965705.html найти рекуррентную форму для явно заданной функции и разработать программный код соответствующей рекурсивной функции |
|
Вычислить функцию Turbo Pascal 1. Дано висоту та сторону правильної трикутної призми, знайти її повну поверхню. 2. Скласти програму для обчислення значення функції Y при заданому х . Y= sin(ln x) при x = 0.7129 |
Turbo Pascal Использование арифметических выражений и функций! Где-то ошибаюсь всегда не могу решить. https://www.cyberforum.ru/ turbo-pascal/ thread965684.html |
|
0 / 0 / 0
Регистрация: 09.09.2013
Сообщений: 12
|
|
| 0 | |
Найти сумму индексов положительных элементов массива - Turbo Pascal - Ответ 512038830.09.2013, 20:22. Показов 1891. Ответов 1
Метки (Все метки)
Входные данные: В первой строке входного потока дано единственное целое число N (0 < N < 32767) Во второй строке перечисленны значения элементов массива. Значение элементов по модули не превышает 100000. Выходные данные: В выходной поток вывести единственное целое число. Пример входного файла (input.txt): 4 10.2 98.3 89.9 -843.53 Пример выходного файла (output.txt): 6 Вернуться к обсуждению: Найти сумму индексов положительных элементов массива Turbo Pascal
0
|
|
| 30.09.2013, 20:22 | |
|
Готовые ответы и решения:
1
Найти сумму положительных и сумму отрицательных элементов массива |
| 30.09.2013, 20:22 | |
| 30.09.2013, 20:22 | |
|
Помогаю со студенческими работами здесь
0
Вычислить сумму тех элементов массива сумма индексов которых совпадает с значением элементов массива. Найти сумму положительных элементов и количество элементов массива, равных нулю Найти сумму элементов массива, принадлежащих к интервалу [-5;5] и количество положительных элементов. |