|
|
| Другие темы раздела | |
|
Pascal Обработка последовательностей символов
https://www.cyberforum.ru/ pascal/ thread1614453.html Помогите пожалуйста решить задачку Дана строка символов s1,...,sn. Преобразовать последовательность s1,...,sn заменив в ней каждую из групп стоящих рядом точек одной точкой. |
Вычислить матричное выражение: исправить ошибку в программе Pascal Помогите пожалуйста. задание: Заданы 3 матрицы A,B и С. Вычислить матричное выражение A*B-C*B+C^2 вот код program m14; uses crt; const n=4; var a,b,c,g,r,z,q,v,w,l:array of integer; i,j,k,d,h,bx,ax:integer; begin |
|
Pascal Написать программу которая формирует квадратную матрицу порядка n по заданному образцу
https://www.cyberforum.ru/ pascal/ thread1614365.html Пожалуйста, помогите решить и понять это чудо \begin{matrix}1 & 1 & 1 & \cdots & \ 1\ & \ 1\ & \ 1\ \\\\ 2 & 2 & 2 & \cdots & 2 & 2 & 0\\\\ 3 & 3 & 3 & \cdots & 3 & 0 & 0\\\\ \vdots & \vdots & \vdots & \ddots & \vdots & \vdots & \vdots\\\\ n-1 & n-1 & 0 & \cdots & 0 & 2 & 0\\\\ n & 0 & 0 & \cdots & 0 & 0 & 1\end{matrix} |
Pascal Упорядочение строк матрицы Помогите с заданием Упорядочить строки целочисленной прямоугольной матрицы по возрастанию количества одинаковых элементов в каждой строке, и все это в процедуре. https://www.cyberforum.ru/ pascal/ thread1614352.html |
|
Pascal Разработать программу, позволяющую из двух целочисленных матриц получить третью Разработать программу, позволяющую из двух целочисленных матриц получить третью в которой элементы расположенные ниже главной и выше побочной диагоналей равны элементам первой матрицы, элементы расположенные ниже главной и выше побочной диагонали равны элементам второй матрицы, а остальные элементы равны нулю. |
Pascal Сумма элементов с рекурсией
https://www.cyberforum.ru/ pascal/ thread1614207.html всем здравствуйте! в общем проблема такая: дана задача : написать рекурсивную программу вычисления суммы (n, i=2) = i^2+i+5 сразу есть программа к ней, и в ней только одна основная функция, которая решает всю задачу: function sum(i:integer):real; begin if i=1 then sum:=0 else sum:= sum(i-1)+i*i+i+5; end; |
| Pascal Цвет переменной uses crt; procedure DEC_HEX(x:integer;var res:string); const digits:array of char = ('0','1','2','3','4','5','6','7', '8','9','A','B','C','D','E','F'); var s:string; d:0..15; begin textcolor(LightBlue); if x>15 then DEC_HEX((x div 16),res) else res:=''; res:=res+digits; end; https://www.cyberforum.ru/ pascal/ thread1614138.html |
Напишите программу, которая определяет, во что превращаются S рублей Pascal Напишите программу, которая определяет, во что превращаются S рублей при инфляции P процентов через N лет. Использование цикла обязательно! По желанию можно дополнить программу расчётом по формуле геометрической прогрессии. |
| Pascal Напишите программу, которая выводит на экран заданную последовательность Напишите программу, которая выводит на экран последовательность из N чисел: 1, -2, 4, -8,...и т.д. Примеры работы программы: введите N: 2 результат: 1, -2 введите N: 6 результат: 1, -2, 4, -8, 16, -32 https://www.cyberforum.ru/ pascal/ thread1614058.html |
Pascal Напишите программу, которая вычисляет доход от вклада в банке
https://www.cyberforum.ru/ pascal/ thread1614055.html Напишите программу, которая вычисляет доход от вклада в банке. Входные данные: сумма вклада (рублей), процент увеличения вклада за год (процентов), срок хранения вклада (лет). Выходные данные: доход от вклада (рублей). Использование цикла обязательно! |
|
Записать результаты обработки в файл Pascal Здравствуйте.Написал программу которая определяет какая гласная буква встречается больше всего и сколько раз.Но вот не пойму как нужно записать результаты обработки в файл.Прошу помощи. uses crt; var s:string; i,imax: byte; a: array of byte; begin write('Введите строку----> '); readln(s); for i:=1 to length(s) do |
Pascal Определить, является ли заданная целая квадратная матрица N-го порядка симметричной
https://www.cyberforum.ru/ pascal/ thread1613479.html Определить, является ли заданная целая квадратная матрица N-го порядка симметричной (относительно главной диагонали). Используя двумерный массив. Заранее спасибо:) |
|
0 / 0 / 3
Регистрация: 24.08.2012
Сообщений: 76
|
|
| 0 | |
Максимальный элемент, заменить произведением отрицательных элементов - Pascal - Ответ 849383215.12.2015, 18:49. Показов 687. Ответов 1
Метки (Все метки)
Вернуться к обсуждению: Максимальный элемент, заменить произведением отрицательных элементов Pascal
0
|
|
|
|
| 15.12.2015, 18:49 | |
|
Готовые ответы и решения:
1
Заменить каждый отрицательный элемент произведением всех ненулевых элементов массива Заменить каждый отрицательный элемент массива произведением всех ненулевых элементов
|
| 15.12.2015, 18:49 | |
|
Помогаю со студенческими работами здесь
0
В массиве найти максимальный элемент и произведение отрицательных элементов Вычислить сумму отрицательных элементов матрицы, найти максимальный элемент Определить максимальный элемент среди отрицательных элементов и его порядковый номер Найти максимальный и минимальный элемент среди отрицательных элементов массива, расположенных на четных местах |