Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Анализ алгоритмов обработки последовательности Free Pascal
Помогите плз. Составить алгоритм или программу. Доказать правильность исполнения. Проанализировать время работы алгоритма. x=sqrt((a+b)/2)
Free Pascal Собирание информации по каталогам из с://, определение самого старого и нового файлов https://www.cyberforum.ru/ free-pascal/ thread746195.html
взять всю информацию по каталогам из c:// и определить, какой самый новый и самый старый файлы. Создать файлы, подождав 5 минут и удалить. (в java)
Free Pascal Графика: салют, фейерверк
Помогите написать программу, на free pascale салюта, фейерверка)) Очень нужна...срочно, буду очень признателен))
Free Pascal Определить среднее арифметическое элементов массива https://www.cyberforum.ru/ free-pascal/ thread746937.html
Сможете эти мини задачки решить: 1. Дан массив D(20). Определить среднее арифметическое элементов массива, больших числа С program prog; const n = 20; var i: Integer; c, s, m: Integer; d: array of Integer;
Free Pascal Скрипты Подскажите, как пишутся скрипты и как их включить в программу? (разумеется для Free Pascal) https://www.cyberforum.ru/ free-pascal/ thread746771.html Free Pascal Рисуем графики функций Можно ли написать прогу так. чтобы ввести функцию, к примеру: y=sin (x)+cos(x), и в графическом режиме строился график. Если можно, то как? Или надо проге "мозги прописать" для такого. https://www.cyberforum.ru/ free-pascal/ thread746719.html
Рекурсия: для заданного m вывести значение функции Free Pascal
Помогите пожалуйста с задачей Напишите программу, которая выводит для заданного m значение следующей функции: F(n)={n^2-n если n<4/(F(n-1+n mod m) иначе
Free Pascal Методом прямого слияния отсортировать список https://www.cyberforum.ru/ free-pascal/ thread746471.html
Плииз..помогите задачу дорешать.(в пятницу крайняк сдать надо)..Нужно методом прямого слияния отсортировать список ..начало набросала и сортировку вроде но что то нетак ..не работает..помогите...
Free Pascal Сформулировать массив, элементы которого вычисляются по определенному правилу https://www.cyberforum.ru/ free-pascal/ thread746933.html
Сможете эти мини задачки решить: 2.Дан массив X(4, 5). Сформулировать массив ,Y(4, 5), элементы которого вычисляются по правилу Y(I, J)=X(I, J) program prog; const m = 4; n = 5; var i, j: Integer; x: array of Integer; y: array of Integer;
Дано число. Узнать, сколько раз в нем встречается минимальная цифра? Free Pascal
Дано число. Узнать, сколько раз в нем встречается минимальная цифра? var a:array of integer; d:integer; i:integer; begin for i:=0 to 9 do a:=0; readln(d); repeat inc(a);
Free Pascal Динамические переменные: объединить две упорядоченные последовательности в одну
Используя представление последовательности чисел в виде линейного списка, напишите программу, решающую задачу: «Объедените две упорядоченные последовательности в одну упорядоченную...
Free Pascal Рекурсия: найти сумму чисел в файле https://www.cyberforum.ru/ free-pascal/ thread746197.html
Помогите решить плз пару задачек. Одна программа должна быть с рекурсией , вторая без. Условие: В текстовом файле задана последовательность положительных чисел, за которой следует отрицательное... как-то так: program p; uses crt; var cur:LongInt=0; sum: Cardinal=0;
 Аватар для Talkoflights
25 / 25 / 17
Регистрация: 23.09.2012
Сообщений: 274
27.12.2012, 18:10 0

Дан двумерный массив. Найти максимальный элемент и проверить сколько раз он встречается в каждой строке? - Free Pascal - Ответ 3925152

27.12.2012, 18:10. Показов 6642. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Anutic как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
uses crt;
var a:array[1..1000, 1..1000] of longint;
i,j,m,n,max,kol:longint;
begin
writeln('vvedite razmeri matrici(MxN)');
readln(m,n);
for i:=1 to m do
begin
     for j:=1 to n do
     begin
          writeln('vvedite element matrici ' ,i,'x',j);
          readln(a[i,j]);
     end;
end;
for i:=1 to m do
begin
     for j:=1 to n do
     begin
          if a[i,j]>max then
          max:=a[i,j];
     end;
end;
for i:=1 to m do
begin
     for j:=1 to n do
     begin
          if a[i,j]=max then
          inc(kol);
     end;
end;
writeln('max=',max,', vstrechaetsya ',kol,' raz.');
end.


Вернуться к обсуждению:
Дан двумерный массив. Найти максимальный элемент и проверить сколько раз он встречается в каждой строке? Free Pascal
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
27.12.2012, 18:10
Готовые ответы и решения:

Дан двумерный массив . Найти максимальный элемент в каждой строке
1 . Дан одномерный массив . Упорядочить его по возрастанию 2 . Дан одномерный массив целых чисел , состоящий из N элементов . Найти номер...

Дан двумерный массив размером 13х12. Найти наибольший элемент массива и указать сколько раз он встречается в массиве
Дан двумерный массив размером 13х12. Найти наибольший элемент массива и указать сколько раз он встречается в массиве

Дан двумерный массив вещественных чисел размерностью n*m. В каждой строке найти минимальный элемент, а среди них-максимальный.
Дан двумерный массив вещественных чисел размерностью n*m. В каждой строке найти минимальный элемент, а среди них-максимальный.

1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
27.12.2012, 18:10
Помогаю со студенческими работами здесь

Дан массив целых чисел, сколько раз в нем встречается максимальный элемент..
:cry: плиз....спасайте.....пол дня пытаюсь решыть задачю...и все время она незапускается.....Дан масив целых чисел, сколько раз в ньом...

Дан числовой массив. Определить, сколько раз в нем встречается максимальный по величине элемент.
7.10.1. Помогите, пожалуйста, решить задачу в С++. Дан числовой массив. Определить, сколько раз в нем встречается максимальный по...

Дан двумерный массив. В каждой строке поменять первый элемент на максимальный по модулю
Дан двумерный массив. В каждой строке поменять первый элемент на максимальный по модулю.

Дан целочисленный двумерный массив. В каждой строке выбрать максимальный и минимальный элемент
Дан целочисленный двумерный массив, в каждой строке выбрать максимальный и минимальный элемент. Записать минимальный на основную диагональ,...

Дан двумерный массив, найти максимальный и минимальный элемент в каждой...
Здравствуйте помогите пожалуйста решить вот эту задачу: Дан двумерный массив, найти максимальный и минимальный элемент в каждой строке...

0
Новые блоги и статьи
Исследование байт-кода Python: подключаем дизассемблер
stackOverflow 19.02.2025
Многие знают, что Python - интерпретируемый язык, но мало кто задумывается о том, что происходит между написанием кода и его выполнением. На самом деле Python использует промежуточное представление. . .
Исследование байт-кода Python: компиляторы против интерпретаторов
stackOverflow 19.02.2025
Понимание байт-кода Python - основополагающий аспект для разработчиков, стремящихся глубже понять внутренние механизмы языка и оптимизировать производительность своих программ. Байт-код представляет. . .
Comprehensions в Python - что это такое?
stackOverflow 19.02.2025
Когда речь заходит о Python, одной из его самых красивых и мощных возможностей являются списковые включения или comprehensions. Это особые синтаксические конструкции, позволяющие создавать новые. . .
Python правда такой медленный? Развенчиваем миф о медлительности
stackOverflow 19.02.2025
Когда речь заходит о выборе языка программирования для нового проекта, вопрос производительности часто становится одним из ключевых факторов. Python, несмотря на свою популярность и простоту. . .
Динамические формы в Flask
stackOverflow 19.02.2025
Работа с веб-формами часто требует гибкости в отношении количества полей, которые пользователь может заполнить. Представьте ситуацию, когда вам нужно создать форму для ввода контактных данных, где у. . .
Обнаружение объектов в реальном времени на Raspberry Pi с OpenCV и Movidius NCS
stackOverflow 19.02.2025
Технология обнаружения объектов в реальном времени становится все более востребованной в различных областях - от систем безопасности до автономных транспортных средств. Особый интерес представляет. . .
где chromium хранит пароли и как их обнулить в пожарном варианте
jigi33 19.02.2025
Where is the chromium browser stores passwords for a sites где chromium-подобный браузер хранит пароли и как их обнулить в пожарном варианте (see screenshot)
howto get access to external internet resources with kinit
jigi33 19.02.2025
Решение проблемы с необходимостью доп. авторизации по Керберос для автоотработки аутентификации на прокси-сервер (see screenshot)
Отслеживание автомобилей и определение скорости с OpenCV и Python на Raspberry Pi
stackOverflow 19.02.2025
В этой статье мы рассмотрим создание системы отслеживания транспортных средств и определения их скорости с использованием компьютерного зрения и библиотеки OpenCV. Наше решение основано на принципе. . .
ENV (environments) valid paths in linux
jigi33 19.02.2025
Environments paths (see screenshot)
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru