Turbo Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Turbo Pascal Найти область допустимых значений аргумента x 1. Найти область допустимых значений аргумента x. 2. Написать процедуру или функцию, которая вычисляет область допустимых значений аргумента x. 3. Написать процедуру или функцию, которая вычисляет... uses crt; function odz(x:real):boolean; begin odz:=(sin(2pix)>=-0.25)and(cos(2pix)>=-0.25) and(sqrt(sin(2pix)+0.25)+sqrt(cos(2pix)+0.25)>0) end; function f(x:real):real; begin... https://www.cyberforum.ru/ turbo-pascal/ thread1045408.html	Turbo Pascal Вычислить: где Xmax - максимальный элемент вектора X(n) Ymax - максимальный элемент вектора Y(m) https://www.cyberforum.ru/ turbo-pascal/ thread1045321.html Вычислить: z=(xmax +ymax)/(√xmax*ymax) где Xmax - максимальный элемент вектора X(n) Ymax - максимальный элемент вектора Y(m).
Turbo Pascal Создать новый массив, заменив отрицательные элементы на –i, положительные на +i , нулевые на 7 https://www.cyberforum.ru/ turbo-pascal/ thread1045651.html Помогите сделать массивы Дан массив B(N). Создать новый массив, заменив отрицательные элементы на –i, положительные на +i , нулевые на 7. Дан массив D(N). Найти среднее геометрическое... 2. uses crt; const n=10; var a:array of integer; i,k:longint; p:real; BEGIN clrscr; randomize; for i:=1 to n do	Turbo Pascal Определить разницу в зарплатах сотрудников Помогите пожалуйста! В отделе работают 3 сотрудника, которые получают заработную плату в рублях. Требуется определить: на сколько зарплата самого высокооплачиваемого из них отличается от самого... Маша21, одна тема - один вопрос. Постить свои задачи в чужих темах запрещено. Это официальное предупреждение.
Turbo Pascal Получить вектор, элементы которого равны суммам элементов соответствующих строк матрицы https://www.cyberforum.ru/ turbo-pascal/ thread1045674.html Пожалуйста, помогите с решением. Дана матрица A(n на m) целых чисел. Получить вектор, элементы которого равны суммам элементов соответствующих строк матрицы. Если сумма заданной величины,... Это то, что касается вектора: For i:= 1 to n do For j:=1 to n do S:=s+a; Если сумма заданной величины, элементы матрицы А этот набор слов сформулируйте по-человечески....	Turbo Pascal Задана квадратная таблица A(N,N), элементами которого являются нули и единицы https://www.cyberforum.ru/ turbo-pascal/ thread1045298.html Задана квадратная таблица A(N,N), элементами которого являются нули и единицы. Подсчитать в ней: 1. кол - во столбцов, в которых нули и единицы чередуются; 2. кол - во единичных столбцов и кол -...
Turbo Pascal Определить количество вхождений символа «а» в каждом слове Ввести текст, состоящий не менее чем из 15 слов. Определить количество вхождений символа «а» в каждом слове. uses crt; var t,s:string; a:array of string; i,j,k,kb,ksl:integer; ch:char; mn:set of char; begin clrscr; mn:=; repeat	Turbo Pascal Динамические структуры данных. Списки https://www.cyberforum.ru/ turbo-pascal/ thread1045548.html С клавиатуры вводятся записи, содержащие ключ, наименование деталей и их количество, упорядоченные по возрастанию ключей (ключ - натуральное число). Сформировать список записей и вывести его на...
Turbo Pascal Функции. Как бы сделали вы? Задание : Вычислить суммы положительных элементов каждой строки для матриц А(10,12) и В (15,10) Я сделала вначале процедуру заполнения массива Далее нужно сделать функцию(и) Как вы считаете что... Вычислить суммы положительных элементов каждой строки для матриц Одну функцию, нужно же вычислить только сумму положительных элементов. https://www.cyberforum.ru/ turbo-pascal/ thread1045554.html	Turbo Pascal Описать функцию, возвращающую True, если параметр является степенью числа 5 https://www.cyberforum.ru/ turbo-pascal/ thread1045460.html Описать функцию IsPower5(K) логического типа, возвращающую True, если целый параметр K (> 0) является степенью числа 5, и False в противном случае. С ее помощью найти количество степеней числа 5 в... function IsPower5(k: longint): boolean; var p: longint; begin p := 1; while p < k do p := p * 5; IsPower5 := p = k; end;
Turbo Pascal Построить базу данных с использованием предложенных полей записей, заполнить записи и реализовать указанные запросы https://www.cyberforum.ru/ turbo-pascal/ thread1045727.html tritik, ссылки на хостинги файлов запрещены. Картинки прикладываются во вложении. Текстовое задание будьте добры набрать текстом. Прочитайте правила форума! tritik, Задание перепечатываем на форум!	Написание программы Turbo Pascal В заданном предложении указать слово, в кот доля гласных (a,o,i,e) МИНИМАЛЬНА

Svager

399 / 378 / 408

Регистрация: 14.09.2013

Сообщений: 1,204

17.12.2013, 20:37

Найти среднее арифметическое элементов строки матрицы, в которой расположен минимальный элемент - Turbo Pascal - Ответ 5512292

17.12.2013, 20:37. Показов 1584. Ответов 1

Метки (Все метки)

Сообщение было отмечено Памирыч как решение

Решение

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
33
34
35
36
37
38
39
uses crt;
const n=5;
var a:array[1..n,1..n] of integer;
i,j,k,min,idx1,idx2,s:integer;
sum:real;
BEGIN
clrscr;
for i:=1 to n do
 for j:=1 to n do
    a[i,j]:=random(10+3);
 
    for i:=1 to n do
    begin
     for j:=1 to n do
      write(a[i,j]:4);
      writeln;
      end;
      writeln;
      min:=a[1,1];
      idx1:=1;idx2:=1;
      for i:=1 to n do
       for j:=1 to n do
        if a[i,j]<min then
        begin
         min:=a[i,j];
         idx1:=i;
         idx2:=j;
        end;
 
       writeln('MIN = ',min,' координаты ',idx1,' ',idx2);
       s:=0;
 
       for j:=1 to n do
         s:=s+a[idx1,j];
 
         sum:=s/n;
         writeln('Среднее ариф = ',sum:3:2);
readkey;
END.

Добавлено через 10 минут
sport2015, через процедуры(функции) не делал,тут ничего такого не было сложного, минимум легко, только ввод и ввывод массива, но я думаю вы если что справитесь

Вернуться к обсуждению:
Найти среднее арифметическое элементов строки матрицы, в которой расположен минимальный элемент Turbo Pascal

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

17.12.2013, 20:37

Готовые ответы и решения:

Найти среднее арифметическое элементов столбца матрицы, в котором расположен минимальный элемент
Помогите пожалуйста,программа должна быть с процедурами и функциями. Задан массив В(М, М). Найти среднее арифметическое элементов...

Найти сумму элементов строки матрицы, в которой расположен минимальный элемент
Задан массив В(К, М). Найти сумму элементов строки, в которой расположен минимальный элемент.

Найти сумму элементов строки матрицы, в которой расположен элемент с наименьшим значением
1)В данной действительной квадратной матрице порядка n найти сумму элементов строки, в которой расположен элемент с наименьшим значением....

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

17.12.2013, 20:37

Помогаю со студенческими работами здесь

Найти сумму элементов той строки матрицы, в которой расположен максимальный элемент
1 задача)Найти сумму элементов той строки массива a(3x3), в которой расположен максимальный элемент матрицы. 2 задача)Найти наибольшую...

Найти максимальный элемент матрицы и номер строки, в которой он расположен
5. дана таблица случайных чисел размерности n на m наити max элемент таблицы и вывести номер строки ,в которой он расположен. помогите...

Найти сумму элементов строки, в которой расположен наименьший элемент в матрице
Найти сумму элементов строки, в которой расположен наименьший элемент в матрице размеров 4х4 с помощью процедур.

В матрице n*m найти сумму элементов той строки,в которой расположен элемент с наибольшим значением
В матрице n*m найти сумму элементов той строки,в которой расположен элемент с наибольшим значением.

Найти сумму элементов того столбца массива, в котором расположен минимальный элемент матрицы
найти сумму элементов того столбца массива а(3,3), в котором расположен минимальный элемент матрицы.

Новые блоги и статьи Все статьи Все блоги /
Сопоставление с образцом (Pattern Matching) в Python: Списки и словари py-thonny 19.03.2025 Программисты любят, когда код говорит сам за себя. Представьте, что вы можете просмотреть структуру данных и мгновенно понять, что с ней делать — без сложных условий и вложенных проверок. Именно эту. . .	Работа с метаданными EXIF и JPEG в JavaScript run.dev 19.03.2025 Работа с изображениями в веб-разработке нередко выходит за рамки простого отображения картинки. Современные задачи требуют глубокого понимания структуры файлов и умения манипулировать их внутренними. . .	Чеклист для Kubernetes в продакшене: Лучшие практики для SRE Mr. Docker 19.03.2025 Когда сталкиваешься с запуском Kubernetes в продакшене, невольно задаешься вопросом: почему то, что так гладко работало в тестовой среде, вдруг начинает вызывать головную боль на боевых системах?. . .	Разработка продвинутого ИИ в Unity с использованием Behavior Graph GameUnited 19.03.2025 В разработке игр искусственный интеллект персонажей часто становится тем элементом, который превращает хорошую игру в выдающуюся. До недавнего времени разработчикам под Unity приходилось либо писать. . .	Словари в Python: методы работы, оптимизация, сериализация py-thonny 19.03.2025 Каждый хотя бы раз сталкивался с необходимостью хранить связанные данные, где важна не только сама информация, но и их взаимосвязь. В дебрях Python словари — это тот универсальный инструмент, который. . .
Реализация паттерна CQRS с Event Sourcing в PHP Jason-Webb 19.03.2025 CQRS (Command Query Responsibility Segregation) — это архитектурный паттерн, который разделяет операции чтения и записи данных в приложении. Если вы столкнулись с ситуацией, когда ваше PHP-приложение. . .	std::span в C++: Подпредставления и срезы NullReferenced 18.03.2025 Если вы когда-нибудь работали с большими объемами данных в C++, то наверняка сталкивались с необходимостью манипулировать отдельными частями массивов или контейнеров. Традиционные подходы часто. . .	std::span в C++: Доступ к элементам и итерирование NullReferenced 18.03.2025 В C++ каждый разработчик сталкивается с проблемой эффективного управления последовательностями данных. Представьте: вы работаете с массивом, передаете его в функцию, а затем в другую, и каждый раз. . .	Утечки памяти в C# UnmanagedCoder 18.03.2025 Когда мы говорим о разработке приложений на C#, то часто успокаиваем себя мыслью, что сборщик мусора решит все наши проблемы с памятью. "Память управляется автоматически" — эта мантра прочно засела в. . .	std::span в C++: Введение в невладеющее представление NullReferenced 18.03.2025 С появлением стандарта C++20 у нас появился новый инструмент — std::span, который представляет собой невладеющее представление для работы с последовательностями данных. std::span — это легковесный. . .

Наверх