|
|
| Другие темы раздела | |
| Free Pascal Дан вектор целых чисел Определить сколько из них больше своих соседей 1)Дан вектор целых чисел. Определить сколько из них больше своих соседей https://www.cyberforum.ru/ free-pascal/ thread1882606.html |
Free Pascal Пузыри на плоскости (Задача) Условие Рассмотрим некоторое конечное множество, состоящее из непрерывно растущих пузырей, расположенных на плоскости. Каждый такой пузырь представляет собой круг, заданный координатами своего центра (xi,yi) и радиальной скоростью vi, указывающей приращение его радиуса за единицу времени. Известно, что рост отдельно взятого пузыря будет остановлен, как только он достигнет границы любого... |
|
Free Pascal Ошибка в функции
https://www.cyberforum.ru/ free-pascal/ thread1882281.html В общем, нужно написать прогу которая будет искать наибольший элемент в каждой из строк массива A (5,5). Обязательно использовать функцию. Написал прогу, выдает ошибку Syntax error, "OF" expected "program n2; var i, j, m: integer; a: array of integer; function max (b:array of integer):integer; var n: integer; begin n:=b; |
Free Pascal Строка и вывод не повторяющихся слов в ней
https://www.cyberforum.ru/ free-pascal/ thread1882043.html Дана строка S, состоящая из слов, разделённых пробелами. Выведите все слова, которые встречаются в S ровно один раз. Формат входных данных Во входном файле дана строка S. Строка S состоит из строчных букв латинского алфавита и пробелов; в ней есть хотя бы одна буква, ёe длина не превышает 100 символов. Формат выходных данных Выведите все слова, которые встречаются в S ровно один раз.... |
|
Free Pascal Написать функцию возведения квадратной матрицы в n-ую степень Помогите найти ошибку в коде. Uses crt; Const size=10; n=15; Type matrix=array of real; Var m,i,j,t:integer; |
Free Pascal Ошибка программы с ассемблерной вставкой
https://www.cyberforum.ru/ free-pascal/ thread1881419.html Коллеги! Есть у меня такой код: uses crt; var max,er:integer; str_,out_s:string; answer:char; procedure print_str(s:string;x,y:byte); begin asm push bp |
|
Free Pascal Программирование одномерных массивов (free Pascal)
https://www.cyberforum.ru/ free-pascal/ thread1881165.html последовательно вводятся n натуральных чисел (n<=10). Вычислить сумму тех из них, у которых первая цифра равна последней. (Не используя массивы, функции, процедуры, используя цикл в цикле) program main; uses math; var n, sum, a:integer; begin sum:=0; a:=0; repeat a:=a+1; read (n); |
Wrong Number of parametrs Free Pascal Снова прошу вашей помощи. Вот сижу с этой прогой уже много времени, и просто глаза и мозг зависли конкретно. Итак, где я облажалась?? program recurs; const C=10; type Matrix = array of real; |
|
Free Pascal Рисунок домика, не графически
https://www.cyberforum.ru/ free-pascal/ thread1880963.html Денис хочет нарисовать на листе бумаги домик. Изображение домика состоит из двух частей - основной части, которая представляет квадрат, и крыши, имеющей форму треугольника, нижняя сторона которого должна содержать целиком верхнюю сторону основной части. У Дениса есть две краски, которых хватит для закрашивания площадей S1 и S2 соответственно. При этом основная часть и крыша должны быть выполнены... |
Free Pascal Получить новую последовательность X, выбросив из исходной все числа, большие заданного числа R
https://www.cyberforum.ru/ free-pascal/ thread1880487.html Как проверять и выкидывать элементы из массивов? Дана последовательность P i=1,2...n (n<=30). Получить новую последовательность X, выбросив из исходной все числа, большие заданного числа R. ( Не использую функции и процедуры) |
|
Сформировать новый массив Free Pascal Элементы одномерного массива W(T) получаются расчетом по формуле W(T)=2 sin(T)+3 cos (T), где Т-позиция элементов массива W(T).сформируйте новый массив R(f) состоящий из элементов массива W(T), которые больше сред.арифметического элемента исходного массива. В новом окне определите позицию максимального элемента. |
Free Pascal Необходимо написать функцию, подсчитывающую, сколько раз в строке встретилась указанная пара символов Написать и протестировать функцию которая подсчитывает сколько раз в заданной строке встретилась указанная парасимволов p.s. прошу прокомментировать действия https://www.cyberforum.ru/ free-pascal/ thread1880158.html |
 6810 / 4567 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
|
|
| 19.12.2016, 10:40 | 0 |
Дана действительная матрица D (n*m) Найти номера столбцов все элементы которых равны 0 - Free Pascal - Ответ 991631419.12.2016, 10:40. Показов 847. Ответов 1
Метки (Все метки)
Ответ
Найти номера столбцов, все элементы которых - нули
Вернуться к обсуждению: Дана действительная матрица D (n*m) Найти номера столбцов все элементы которых равны 0 Free Pascal
0
|
|
| 19.12.2016, 10:40 | |
|
Готовые ответы и решения:
1
Дана целочисленная квадратная матрица размером n*n, найти номера строк, все элементы которых – нули Найти номера строк , все элементы которых равны
Дана действительная матрица размера n x m, все элементы которой различны |
| 19.12.2016, 10:40 | |
| 19.12.2016, 10:40 | |
|
Помогаю со студенческими работами здесь
0
Дана действительная квадратная матрица порядка 12. Заменить нулями все её элементы, расположенные на глав-ной диагонали и выше неё.
Дана действительная матрица размером n x m, все элементы которой различны. В каждой строке выбирается элемент с наименьшим значением, затем среди этих |