Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ocrugl.tpu https://www.cyberforum.ru/ pascal/ thread12975.html
Есть такой файл ocrugl.tpu в Pascal? Подскажете где найти?
Pascal Записать количественное числительное, обозначающее n, в соответствующем падеже
Получил вот такую вот задачку, а как решить что то и ума не приложу, только мысли, ито не на компьютерном сленге ))) Вот текст задачи: "Даны натуральное число n, символ s (n ≤1000, s – одна из букв и, р, д, в, т, п , указывающая падеж – именительный, родительный, дательный, винительный, творительный, предложный). Записать количественное числительное, обозначающее n, в соответствующем падеже"....
Pascal Расставить элементы строк с четными номерами матрицы в порядке убывания. https://www.cyberforum.ru/ pascal/ thread12927.html
Здравствуйте ув. программисты, вот у меня есть задачка... Условие:Дана матрица A порядка n. Расставить элементы строк с четными номерами матрицы в порядке убывания.(Ну и записать его в текстовый файл, но это не важно...) Решил использовать такой код для сортировки: procedure provepka(var a:matr;namefil:stroka); var dop:real; b:array of real; w:text; begin
Pascal Заполнить квадратную матрицу единицами по спирали https://www.cyberforum.ru/ pascal/ thread12919.html
Помогите решить, пожалуйста!!!=-O Заполнить квадратную матрицу NxN единицами ('1') по спирали (начиная с элемента с координатами (1,1) по часовой стрелке. N ввести с клавиатуры (1 <= N <= 10). Распечатывать матрицу после каждого изменения направления заполнения.
Pascal Почему неверное решение..?
Привет всем. Задали задачу по лабе, задача простая...сделал, проверил - всё вроде работает, а препод не хочет принимать и говорит "будет неверно считать":scratch:...я на калькуляторе перепроверил вручную до 10 дней - всё до миллиметра сходится (( %) Условие задачи: Начав тренировки, спортсмен в первый день пробежал 10 км. Каждый следующий день он увеличивал дневную норму на 10% от нормы...
Pascal Определение соответствующего указанной дате дня недели https://www.cyberforum.ru/ pascal/ thread12885.html
Есть задание: Написать программу, которая по введенному дня, месяцу, году, а так же дню недели, который был первым в этом году, определяет соответствующий указанной дате день недели. Год должен быть от 1901 до 2099. Дата должна быть реально существующей, то есть номер месяца должен быть больше 0 и не больше 12, номер дня должен быть больше 0 и не превышать количество дней в соответствующем...
Pascal Вычисление методом промежуточного аргумента... https://www.cyberforum.ru/ pascal/ thread12873.html
Как бы можно было поинтереснее разложить данное уровнение на Паскале... (см. приклепленный файл) {x, y} вывод на клаву...
как решить интеграл в паскале? Pascal
задача: методом Монте-Карло найти массу квадратной пластины с плотностью ρ(x,y)=2*sin(x+y) математически я ее решил(ответ: 4).. она свелась к нахождению двойного интеграла т.е.: интеграл от 0 до π/2 от интеграла от 0 до π/2 от 2*sin(x+y) по dx dy проблема в том что я незнаю как решить интеграл в паскале.. в хелпе я не нашел функции которая решает интегралы, и даже думаю что таких...
Pascal Linux Ubuntu компилирование через терминал https://www.cyberforum.ru/ pascal/ thread12811.html
Подскажите плз! В линуксе дебиане скомпилировать из .pas можно с помощью команды gpc -o file file.pas где file это имя файла, а как же в убунту так скомпилировать?? Эта команда не подходит, а других просто не знаю....:help::help::help::help:
Pascal Файл прямого доступа. Подскажите пожалуста, что есть такое "фаил прямого доступа" в Паскале? Если естьвозможность брости программку с примером работы. Заранее спасибо. https://www.cyberforum.ru/ pascal/ thread12654.html
Удалить четные по порядку слова в входной строке Pascal
Pascal Без использования массивов упорядочить значения в файле по возрастанию С помощью генератора псевдослучайных чисел (Random(100)) сформировать файл из N элементов. Без использования массивов упорядочить значения по возрастанию. Результат сохранить в отдельном файле. Подпрограмма создания псевдослучайного файла должна быть в отдельном модуле. У меня не получается упорядочить элементы которые хранятся в текстовом файле. С какой переменной необходимо его связывать и... https://www.cyberforum.ru/ pascal/ thread12508.html
Почетный модератор
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,182
26.09.2008, 15:43 0

Найти сумму наименьших элементов каждой строки матрицы и их координат - Pascal - Ответ 56771

26.09.2008, 15:43. Показов 2221. Ответов 1
Метки (Все метки)

Ответ

Код
uses crt;
const max=50;
type Tmatr=array[1..max,1..max] of real;
var
  a:Tmatr;
  n:integer;
Procedure VvRaz;
begin
repeat
write('Введите размер матрицы <=10 n=');
readln(n);
until (n>0)and(n<=10);
end;
Procedure VvMatr;
var i,j:integer;
begin
randomize;
for i:=1 to n do
for j:=1 to n do
a[i,j]:=random(10)+random;
end;
Procedure VyvMatr;
var i,j:integer;
begin
writeln('Исходная матрица:');
for i:=1 to n do
  begin
    for j:=1 to n do
    write(a[i,j]:5:2);
    writeln;
  end;
end;
Procedure Vych;
var i,j,jmin:integer;
    min:real;
begin
for i:=1 to n do
   begin
    min:=a[i,1];
    for j:=1 to n do
    if a[i,j]<min then
      begin
        min:=a[i,j];
        jmin:=j;
      end;
    writeln('В строке ',i,' =',(min+i+jmin):0:2);
  end;
end;
begin
clrscr;
VvRaz;
VvMatr;
VyvMatr;
writeln('Сумма наименьших элементов и их координат:');
Vych;
readln
end.


Вернуться к обсуждению:
Найти сумму наименьших элементов каждой строки матрицы и их координат Pascal
1
Заказать работу у эксперта
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
26.09.2008, 15:43
Готовые ответы и решения:

Найти сумму наименьших элементов каждой строки матрицы
7. Разработать алгоритмы и программы решения задачи: a) найти сумму наименьших элементов каждой...

Найти сумму наименьших элементов каждой строки матрицы
погамите

Найти сумму наименьших элементов каждой строки матрицы и их координаты
Здравствуйте! в Возможно такая темы была уже, но я так и не нашел( В общем задача такая: Задана...

[MASM] Найти сумму наименьших элементов каждой строки матрицы
доброго времени суток, помогите начинающему с решением проблемы: в рабочей проге(с положительными...

1
26.09.2008, 15:43
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
26.09.2008, 15:43
Помогаю со студенческими работами здесь

Найти сумму наименьших элементов каждой строки массива
Помогите решить пожалуйста) 1.Дан массив X(N,M). Найти номер той строки в массиве,сумма элементов...

Найти произведение наибольших и наименьших элементов каждой строки матрицы
Данно двохмерный массив в котором необходимо обчислить произведение найбольших и найменьших...

Найти произведение наименьших элементов каждой строки матрицы и их координаты
Найти произведение наименьших элементов каждой строки матрицы и их координаты

Найти суммы наименьших элементов каждой строки матрицы размером 5х8, состоящей из элементов целого типа
Извиняюсь за наглость, помогите написать две программы, очень срочно надо, сам не осилю....

Создать функцию, определяющую суммы наибольших и наименьших значений элементов каждой строки каждой матрицы. Вывести на экран исходные матрицы и их
Создать функцию, определяющую суммы наибольших и наименьших значений элементов каждой строки...

Найти сумму элементов каждой четной строки матрицы и произведение элементов каждой нечетной
В матрице D(10,15) найти сумму элементов каждой четной строки и произведение элементов ...

0
Новые блоги и статьи
Как преобразовать список списков в простой список в Python
bytestream 22.01.2025
При работе с Python разработчики часто сталкиваются с необходимостью обработки сложных структур данных, среди которых особое место занимают вложенные списки. Эти структуры представляют собой списки,. . .
Что такое GUID / UUID и как их создать
bytestream 22.01.2025
В мире разработки программного обеспечения существует постоянная потребность в уникальной идентификации объектов, записей и ресурсов. Эта задача становится особенно актуальной в распределенных. . .
Как добавить пустую директорию в репозиторий Git
bytestream 22.01.2025
При работе с системой контроля версий Git разработчики часто сталкиваются с ситуацией, когда необходимо сохранить пустую директорию в репозитории. Данная задача может показаться простой на первый. . .
Как валидировать адрес email в JavaScript
bytestream 22.01.2025
JavaScript, как основной язык веб-разработки, предоставляет разработчикам множество инструментов для реализации эффективной валидации email-адресов. От простых встроенных решений до сложных. . .
Как заменить все вхождения подстроки в JavaScript
bytestream 22.01.2025
Строки в JavaScript представляют собой неизменяемые последовательности символов, что делает их обработку особенно интересной с точки зрения оптимизации и выбора правильного подхода к решению задач. . . .
Управление версиями пакетов в Node.js. В чем разница между тильдой (~) и кареткой (^) в package.json
bytestream 22.01.2025
В современной разработке программного обеспечения управление версиями пакетов играет ключевую роль в обеспечении стабильности и надежности проектов. Node. js, как одна из самых популярных платформ для. . .
Аутентификация на сайте с помощью формы
bytestream 21.01.2025
В современном цифровом мире безопасная аутентификация становится краеугольным камнем защиты веб-приложений и пользовательских данных. Каждый день миллионы людей используют различные онлайн-сервисы,. . .
Как получить индекс в цикле for в Python
bytestream 21.01.2025
При работе с коллекциями данных в Python часто возникает необходимость не только получить доступ к элементам последовательности, но и знать их позицию в процессе итерации. Индексация в циклах. . .
Как определить адрес, из которого локальный репозиторий Git был клонирован
bytestream 21.01.2025
В современной разработке программного обеспечения система контроля версий Git стала неотъемлемой частью рабочего процесса. При работе с Git разработчики часто сталкиваются с необходимостью. . .
Какая разница между операторами == и === в сравнениях в JavaScript
bytestream 21.01.2025
В мире веб-разработки JavaScript занимает особое место как динамический язык программирования, предоставляющий разработчикам широкий набор инструментов для создания интерактивных веб-приложений. . . .
Из чего и как собрать свой домашний кинотеатр
bt_guru 21.01.2025
Создание домашнего кинотеатра: от идеи до реализации В современном мире домашний кинотеатр стал неотъемлемой частью комфортного жилого пространства, предоставляя возможность наслаждаться. . .
Ошибки стиральных машин
bt_guru 21.01.2025
Современные стиральные машины представляют собой сложные электронные устройства, оснащенные множеством датчиков и систем контроля. Они способны самостоятельно определять вес загруженного белья,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru