|
|
| Другие темы раздела | |
|
Pascal Вычислить произведение
https://www.cyberforum.ru/ pascal/ thread1652555.html program lab6; var P:real; k,N:integer; begin P:=1; N:=30; for k:=1 to N do begin if (k<6) then P:=P*(sqr(sin(k))+cos(k)) else if (6<=k) and (k<=10) then P:=P*0 else if (k>10) then P:=P*(sqr(cos(k))+sin(k)) |
Структура: Напечатать списки школ, занявших призовые места Pascal Добрый день. Сложную тему проходим, дали 5 задач, помогите с одной из них, они по сути аналогичные, а там остальные по примеру сделаю) Условие: На олимпиаде по информатике на школьников заполнялись анкеты: фамилия, номер школы, класс, занятое место. Напечатать: 1) списки школ, занявших призовые места; 2) какая из школ заняла больше всех призовых мест; 3) списки учеников занявших первое... |
|
Pascal Сортировка элементов матрицы по возрастанию
https://www.cyberforum.ru/ pascal/ thread1652157.html Дана матрица A(n,m) Случайных чисел генерированных в диапазоне от 12 до +24. Отсортировать элементы матрицы по возрастанию элементов. const n=5; m=5; var a:array of integer; i,j,k,b:integer; begin randomize; k:=0; |
Pascal Напечатать все слова, отличные от последнего слова, предварительно преобразовав их по заданному правилу Добрый день помогите пожалуйста ! Само условие я сделал . Не могу понять как задать от 2 до 30 слов и латинские буквы в каждом слове от 2 до 10. Срочно помогите ! Сегодня сдавать нужно ! Вот сама задача :Дан текст, содержащий от 2 до 30 слов, в каждом из которых от 2 до 10 латинских букв; между соседними словами - не менее одного пробела. Напечатать все слова, отличные от последнего слова,... https://www.cyberforum.ru/ pascal/ thread1651824.html |
|
Для аргумента , изменяющегося от –0.6 с шагом 0.05 вычислить 20 значений функций Pascal В общем задание такое: Для аргумента , изменяющегося от –0.6 с шагом 0.05 вычислить 20 значений функций: f1(x)=\frac{-x}{4}+\frac{\sqrt{2}(1+{x}^{4})}{32}*(\ln \frac{{x}^{2}+x*\sqrt{2}+1}{{x}^{2}-x*\sqrt{2}+1}+2\operatorname{arctg} (\frac{x*\sqrt{2}}{1-{x}^{2}})) f2(x)=\sum_{k=0}^{\infty}\frac{({-1}^{k}){x}^{4k+5}}{(4k+1)(4k+5)} Функцию f2(x) вычислить для ряда точностей . Для указанных... |
Pascal Сформировать вектор D, состоящий из номеров строк, содержащих хотя бы один отрицательный элемент
https://www.cyberforum.ru/ pascal/ thread1651505.html выполнить с использованием процедуры ввод и вывод массивов и других данных не объединять с обработкой данных. Дана целочисленная матрица А размером 10х12. Сформировать вектор D, состоящий из номеров строк, содержащих хотя бы один отрицательный элемент. Использовать процедуру для формирования вектора. |
|
Pascal Напечатать все простые числа из диапазона [2, n].
https://www.cyberforum.ru/ pascal/ thread1651471.html Дано целое п > 2. Напечатать все простые числа из диапазона . |
Pascal Составить процедуру для нахождения элементамассива, значение которого близко к заданному числу Дан массив А, элементами которого являются n действительных чисел. Составить процедуру для нахождения элемента, значение которого близко к заданного числа Х. |
|
Pascal Составить функцию для вычисления количества цифр натурального числа
https://www.cyberforum.ru/ pascal/ thread1651255.html Дано натуральное число N. Составить функцию для вычисления количества его цифр |
Pascal Квадратное уравнение сборочным методом
https://www.cyberforum.ru/ pascal/ thread1651241.html Здравствуйте.Мне надо написать программу которая будет находить корни квадратного уравнения, но надо чтобы она была составлена сборочным методом т.е "снизу вверх"(сначала вспомогательные алгоритмы, а затем основной).Спасибо |
|
Суммировать общее количество символов внутри каждого слова Pascal Помогите пожалуйста сделать задание: пользователь вводит несколько слов латинскими буквами. Пользователь вводит две буквы. Суммировать общее количество символов внутри каждого слова, которые находятся между этими буквами и вывести это значение на экран. Добавлено через 7 минут Пользователь вводит предложение, состоящее из слов, написанных латинскими буквами. |
Pascal Найти наименьшее из значений элементов столбца, который обладает наибольшей суммой модулей элементов. Дана целочисленная квадратная матрица порядка 8. Найти наименьшее из значений элементов столбца, который обладает наибольшей суммой модулей элементов. Если таких столбцов несколько, то взять первый из них. https://www.cyberforum.ru/ pascal/ thread1651214.html |
|
0 / 0 / 0
Регистрация: 19.12.2015
Сообщений: 11
|
|
| 0 | |
Вычислить произведение отрицательных элементов массива - Pascal - Ответ 869632601.02.2016, 13:09. Показов 3539. Ответов 10
Метки (Все метки)
1)произведение отрицательных элементов массива; 2)сумму положительных элементов массива, расположенных до максимального элемента. Изменить порядок следования элементов в массиве на обратный. (Помогите пожалуйста, напишите код в паскале) Вернуться к обсуждению: Вычислить произведение отрицательных элементов массива Pascal
0
|
|
| 01.02.2016, 13:09 | |
|
Готовые ответы и решения:
10
Вычислить произведение отрицательных и положительных элементов в массиве.
Вычислить произведение отрицательных элементов с чётными индексами |
| 01.02.2016, 13:09 | |
| 01.02.2016, 13:09 | |
|
Помогаю со студенческими работами здесь
0
Произведение, количество отрицательных элементов массива |