Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Дана последовательность из N чисел: а (1), а (2), а (3) ... а (n). Найти количество отрицательных чисел https://www.cyberforum.ru/ pascalabc/ thread986172.html
Дана последовательность из N чисел: а (1), а (2), а (3) ... а (n). Найти количество отрицательных чисел.
Часы с боем Pascal ABC
нужно срочно решить задачу по программированию. Старинные часы бьют каждые полчаса.Причем в начале каждого часа они бьют столько раз,сколько сейчас часов.И ещё 1 раз они бьют в середине каждого...
Сумму элементов главной диагонали матрицы увеличить на значение максимального элемента Pascal ABC
Найти суму элементов главной диагонали, увеличить на значение максимального элемента в массиве В(М,М)
Pascal ABC Образовать новый массив В12, элементами которого будут элементы исходного массива А12, имеющие четное значение Вывести на экран 12 случайных чисел от А до В, которые являются элементами массива А12 . Значения А и В задаются с экрана. Образовать новый массив В12, элементами которого будут элементы исходного... https://www.cyberforum.ru/ pascalabc/ thread986122.html
Pascal ABC Вывод на экран элементов массива с нечетными индексами https://www.cyberforum.ru/ pascalabc/ thread986102.html
Составьте программу, которая позволяет вводить с клавиатуры элементы массива а и вывода на экран элементов массива с нечетными индексами
Выход за границы диапазона изменения индекса Pascal ABC
Доброго времени суток! При компиляции ошибка: »*Ошибка: 100001 - выход за границы диапазона изменения индекса 0..100000 (NumericalIntegrationParabola.pas, строка 17) исходник: program...
связь с файлами Pascal ABC
var n,i:integer; procedure razl(n,i:integer); begin if n>1 then if n mod i=0 then begin write('*',i);razl(n div i,i)end
Pascal ABC составьте программу в Pascal ABC Составьте программу, которая позволяет вводить с клавиатуры элементы массива а , а затем выводит на экран в первую строку первые 5 элементов, во вторую остальные 5 элементов. https://www.cyberforum.ru/ pascalabc/ thread986003.html
Pascal ABC Найти сумму элементов главной диагонали матрицы https://www.cyberforum.ru/ pascalabc/ thread985938.html
помогите с ошибками, пожалуйста. program pr7; const n = 3; m = 3; var MAS:array of integer; i, j, a, b, min, S:integer; begin min := MAS; for i := 1 to n do
Pascal ABC Составьте программу ввода с клавиатуры элементов массива а [1.10] и вывода их на экран в столбец Составьте программу ввода с клавиатуры элементов массива а и вывода их на экран в столбец https://www.cyberforum.ru/ pascalabc/ thread985937.html
3450 / 2388 / 2135
Регистрация: 04.12.2011
Сообщений: 3,965
24.10.2013, 09:48 0

Найти наименьшее число матрицы и удалить строку в котором оно находится

24.10.2013, 09:48. Показов 1672. Ответов 1
Метки (Все метки)

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

Решение

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
const
  nmax=5;
var
  a: array[1..nmax,1..nmax] of integer;
  n,m,i,j,imin,jmin: byte;
begin
  n:=4; m:=5;
  imin:=1; jmin:=1;
  writeln('Èñõîäíûé ìàññèâ:');
  for i:=1 to n do
  begin
    for j:=1 to m do
    begin
      a[i,j]:=random(199)-99;
      write(a[i,j]:4);
      if a[i,j]<a[imin,jmin] then begin
        imin:=i; jmin:=j;
      end;
    end;
    writeln;
  end;
  writeln('Min = a[',imin,',',jmin,'] = ',a[imin,jmin]);
  for i:=imin to n do
    for j:=1 to m do
      a[i,j]:=a[i+1,j];
  dec(n);
  writeln('Ïðåîáðàçîâàííûé ìàññèâ:');
  for i:=1 to n do
  begin
    for j:=1 to m do
      write(a[i,j]:4);
    writeln;
  end;
  writeln;
end.


Вернуться к обсуждению:
Найти наименьшее число матрицы и удалить строку в котором оно находится
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.10.2013, 09:48

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

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

Удалить столбец матрицы в котором находится max эллемент.
Пожалйста помогите ......Дана матрица размером n x m найти максимальный эллемент этой матрицы.И...

Удалить столбец матрицы, в котором находится минимальный элемент.
Удалить столбец, в котором находится минимальный элемент.

Удалить столбец в котором находится максимальный элемент матрицы
Дана целочисельная прямоугольная матрица.1,найти мин. елемент среди макс. прогу я попытался сделать...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.