|
|
Другие темы раздела | |
Pascal ABC Двумерный массив n = 5, m = 6. Числовые значения переменных x и y задаются по вводу. Найти первые по возрастанию номеров строк элементы, имеющие минимальные и максимальные значения, напечатать их значения и номера индексов. Поменять местами элементы строк, которым принадлежат найденные элементы. Напечатать исходную и преобразованную матрицу. Вывод массива сделать в файл a_{i, j}=\begin{cases}<br... https://www.cyberforum.ru/ pascalabc/ thread1321510.html |
Pascal ABC Найти количество нечетных положительных элементов в каждой строке матрицы Помогите довести программу до ума :) Суть : в двух заданных матрицах произвольного размера найти количество нечетных положительных элементов в каждой строке. uses crt; type matr=array of real; var a,b:matr; m,n:integer; procedure make(m1,n1:integer; var c:matr); var i,j:byte; begin for i:=1 to n do |
Pascal ABC Задача "Найти номер треугольника с наибольшей площадью"
https://www.cyberforum.ru/ pascalabc/ thread1321377.html Очень нужна помощь с данной задачкой,желательно с комментариями. Даны одномерные массивы A и B из n элементов каждый. Определить номер треугольника со сторонами длиной (Ai, Bi,(Ai+Bi)/2), обладающего наибольшей площадью. Заранее спасибо. |
Pascal ABC Матрица А имеет седловую точку А [i:j], если А [i:j] является минимальным элементом Матрица А имеет седловую точку А , если А является минимальным элементом в i -й строке и максимальным в j -м столбце. Для заданной целой матрицы размером 10 x 12 напечатать индексы всех ее седловых точек. https://www.cyberforum.ru/ pascalabc/ thread1321356.html |
Переписать в другой файл все строки с заменой в них запятой на точку Pascal ABC Требуется помощь в двух задачах, пишу сюда, ибо сам зашел в тупик. Желательно код с комментариями, дабы понять все: 2. Имеется текстовый файл. Переписать в другой файл все строки с заменой в них запятой на точку. Заранее спасибо |
Pascal ABC Вывести на экран те строки файла, которые не содержат слово NO Требуется помощь в двух задачах, пишу сюда, ибо сам зашел в тупик. Желательно код с комментариями, дабы понять все: 1. Вывести на экран те строки файла, которые не содержат слово NO Заранее спасибо https://www.cyberforum.ru/ pascalabc/ thread1321348.html |
Pascal ABC Вычислить значение функции
https://www.cyberforum.ru/ pascalabc/ thread1321311.html F=Z^2+0,75Z-0,25 Z =\begin{cases}y^2+2y; & \text{y\leq 0} \\y^2+\sqrt{y}; & \text{0<y<2} \\y+lny; & \text{y\geq 2}\end{cases} y=2x^2+\sqrt{3x} x\epsilon \Delta x=1 Добавлено через 1 час 46 минут Думаю так, но выходит ошибка. |
Pascal ABC Задача "Подъезд дома" Здравствуйте! Помогите, пожалуйста, разобраться, что не так с программой. Задача: Определить номер подъезда девятиэтажного дома по указанному номеру квартиры N. Считать, что на каждом этаже находится M квартир. Входные данные: Во входном потоке в первой строке задано два целых числа: N и M (1 < N, M < 1000000000) Выходные данные: В выходной поток вывести единственное целое число. |
Pascal ABC Множества Написать программу, которая позволяет пользователю вводить два множества и находит пересечение этих множеств. Помогите написать код который позволит пользователю вводить множества. https://www.cyberforum.ru/ pascalabc/ thread1321198.html |
Pascal ABC Пишет "Выход за границы диапазона изменения индекса 0.100"
https://www.cyberforum.ru/ pascalabc/ thread1321161.html for y:=0 to a-1 do for x:=0 to b-1 do x22:=x2;Я то сам понял-почему так происходит, но я не могу понять как это исправить, если кто может-можете написать сразу решение всей задачи. Недавно археологической командой "Раскопай" были обнаружены остатки древней цивилизации. Особое внимание привлекла карта с месторасположением народов, живших в то время. Карта представляет собой прямоугольный... |
нужно сделать прогу с процедурами, (определить номер строки и столбца, имеющие минимальную сумму элементов) Pascal ABC вот есть программа, но она ищет только минимальный элемент строки, а мне надо еще и столбца(( если не сложно, плиз лабу сдать надо срочно. З.Ы У меня есть то что надо, только сделано без помощи процедуры) см. вложение uses crt; const nmax=20; type mas=array of integer; matr=array of mas; var a: matr; n,m,i,j,z: byte; sum,summin: integer; |
Pascal ABC Сделать ввод текстовым файлом Input.txt, а вывод output.txt
https://www.cyberforum.ru/ pascalabc/ thread1320901.html var a : longint; s : string; i, n : integer; begin readln(a); str(a, s); n := length(s); for i := 1 to n - 1 do if s < s then begin |
0 / 0 / 0
Регистрация: 12.12.2020
Сообщений: 23
|
|
17.12.2020, 08:30 | 0 |
Все элементы массива с четными номерами, предшествующие первому max, умножить на значение максимума - Pascal ABC - Ответ 1510678417.12.2020, 08:30. Показов 2713. Ответов 3
Метки (Все метки)
Ответ
здраствуйте, а можно блок схему
Вернуться к обсуждению: Все элементы массива с четными номерами, предшествующие первому max, умножить на значение максимума Pascal ABC
0
|
17.12.2020, 08:30 | |
Готовые ответы и решения:
3
Все члены данной последовательности с четными номерами, предшествующие первому по порядку члену, домножить на max Массивы: элементы массива с четными номерами, предшествующие первому максимальному элементу, умножить... Массив: Все элементы массива с четными номерами умножить на значение max. Все элементы массива с чётными номерами до первого max элемента массива умножить на заданное значение |
17.12.2020, 08:30 | |
17.12.2020, 08:30 | |
Помогаю со студенческими работами здесь
0
Все члены массива с четными номерами, предшествующие первому наибольшему, домножить на значение этого элемента Все элементы этого массива, предшествующие первому по порядку элементу со значением max(a1, ...,a10), умножить на этот максимальный элемент Все элементы с четными индексами, предшествующие первому экстремальному в массиве, умножить на 2 Массив: Все элементы с четными номерами перед первым максимальным элементом массива умножить на это значение. |