|
|
| Другие темы раздела | |
| Pascal ABC Шифр Цезаря Написать программу для шифрования произвольного текста с использованием шифра Цезаря. Ключ должен быть любым. Для латинского алфавита. https://www.cyberforum.ru/ pascalabc/ thread2406384.html |
Pascal ABC Найдите ошибки, пожалуйста procedure Max( b: real; var bmax : real; k : integer); begin if b<0 then if k=0 then begin k:=1; bmax:=b end else if b>bmax then bmax:=b; if k=1 then writeln (' max = ', bmax:5:2) else writeln (' no numbers less then 0') |
|
Pascal ABC Написать программу, содержащую процедуру, которая удаляет указанный элемент из числового массива
https://www.cyberforum.ru/ pascalabc/ thread2406347.html Написать программу, содержащую процедуру, которая удаляет ука- занный элемент из числового массива. При этом все элементы, лежащие ниже удаляемого, поднимаются вверх. Последний элемент массива обну- ляется. С помощью указанной процедуры удалить все вхождения наи- большего и наименьшего элементов. Подскажите, пожалуйста) |
Pascal ABC Массив: Найти количество элементов, равных заданному числу, за один просмотр массива. Алгоритм сложности O(N). Дан массив, содержащий числа, более половины которых равны данному числу. Найдите это число за один просмотр массива. Помогите пж!!! https://www.cyberforum.ru/ pascalabc/ thread2406342.html |
|
Разработка алгоритмов и программ с использованием очередей Pascal ABC Создать очередь, удалить с очереди 4 элемента |
Pascal ABC Дана матрица 7*7. Определить суммы всех элементов матрицы, лежавших на диагоналях
https://www.cyberforum.ru/ pascalabc/ thread2406215.html Двумя вариантами. 1.Написать программу используя процедуры и функции без параметров 2. Используя функцию с глобальными переменными(параметров должно быть больше трёх) Сделать блок-схемы к каждой функции и процедуре и общую для всей программы ЗАДАНИЕ: Дана матрица 7*7. Определить суммы всех элементов матрицы, лежавших на диагоналях. |
|
Pascal ABC Рекурсия. Найдите наименьшее число, оканчивающееся на цифру n...
https://www.cyberforum.ru/ pascalabc/ thread2406129.html Задача:Найдите наименьшее число, оканчивающееся на цифру n ( ) n ∈ 9;2( ), такое, что если перенести последнюю цифру в начало, то оноувеличится в n раз. Укажите цифры, для которых это невозможно. Со- ставьте рекурсивный вариант программы. Мое решение: var a,b,c,u:Integer; t:String; begin |
Pascal ABC Для указанных рядов вычислить и вывести сумму N слагаемых... Пользователь задает натуральное число N, вещественное число E (точность) и вещественное число x, лежащее в интервале (-R,+R). Для указанных рядов вычислить и вывести сумму N слагаемых Вообще решение нужно на питоне, но с паскаля на питон я переведу сам. Теперь по задаче. Не пойму, что за точность? Точность чего? Также не понятно, что за указанные ряды? Чувствую, что решение очень простое, но... |
| Pascal ABC Создание и реализация программ с использованием текстовых файлов Даны два файла f1 и f2. Найти в файле f2 число, ближайшее по размеру до минимального значения файла f1. https://www.cyberforum.ru/ pascalabc/ thread2405864.html |
Pascal ABC Переделать программу, используя подпрограммы (процедуры и функции)
https://www.cyberforum.ru/ pascalabc/ thread2405835.html Напечатать все слова, отличные от последнего слова. Для каждого слова указать сколько раз оно встречается в полученном предложении. Сообщение об одном и том же слове должно печататься не более одного раза + Удалить все слова с нечетными номерами и перевернуть все слова с четными номерами. program prgr; {$APPTYPE CONSOLE} uses SysUtils; |
|
Pascal ABC Найти номер телефона указанного абонента с максимальной суммой оплаты ПаскалЬ(поиски, замена положения в массиве)(ПСЕВДО БД) Здравствуйте, очень нужна ваша помощь. Запись с полями: ФИО абонента, номер телефона, тарифный план, оплата за разговоры. Задания :1. найти номер телефона указанного абонента с максимальной суммой оплаты 2. Методом линейного поиска определить среднюю оплату за разговоры для указанного тарифного плана 3.метолом двоичного поиска найти... |
Pascal ABC Расставить 3 числа по убыванию. Даны три действительных числа x1, x2, x3. Составить программу расстановки их в убывающем порядке при любом исходном порядкк https://www.cyberforum.ru/ pascalabc/ thread2405606.html |
 6811 / 4568 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
|
|
| 20.02.2019, 14:39 | 0 |
Цикл: Заменить в исходной последовательности все положительные элементы на отрицательные - Pascal ABC - Ответ 1334255520.02.2019, 14:39. Показов 781. Ответов 1
Метки (Все метки)
Ответ
Заменить в массиве все отрицательные элементы на положительные
Вернуться к обсуждению: Цикл: Заменить в исходной последовательности все положительные элементы на отрицательные Pascal ABC
0
|
|
| 20.02.2019, 14:39 | |
|
Готовые ответы и решения:
1
|
| 20.02.2019, 14:39 | |
| 20.02.2019, 14:39 | |
|
Помогаю со студенческими работами здесь
0
Заменить в массиве все отрицательные элементы на положительные
|