Подскажите чего не хватает в программе

@Яна0407 · Регистрация: 04.04.2017

Студворк — интернет-сервис помощи студентам

Дана матрица b[3,5], найти строку, содержащую минимальный элемент.

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
Program laba3;
const
n=5;
m=3;
var
b:array[1..n,1..m] of real;
i,j,imin,jmin:integer;
min:real;
begin
for i:=1 to n do
for j:=1 to m do
begin
writeln('b[',i,',',j,']');
readln(b[i,j]);
end;
for i:=1 to n do
begin
for j:=1 to m do
writeln(b[i,j]:3:0,'  ');
writeln;
end;
i:=т;
min:=b[1,1];
for i:=1 to n do
for j:=1 to m do
begin
if b[i,j]<min then
begin
min:=b[i,j];
imin:=i;
jmin:=j;
end;end;
writeln('min:=',min:5:2);
end.

@Puporev · 05.04.2017, 16:39

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
const n=3;
      m=5;
var b:array[1..n,1..m] of real;
    i,j,imin:integer;
    min:real;
begin
for i:=1 to n do
for j:=1 to m do
 begin
  write('b[',i,',',j,']=');
  readln(b[i,j]);
 end;
for i:=1 to n do
 begin
  for j:=1 to m do
  write(b[i,j]:6:2);
  writeln;
 end;
min:=b[1,1];
imin:=1;
for i:=1 to n do
for j:=1 to m do
if b[i,j]<min then
 begin
  min:=b[i,j];
  imin:=i;
 end;
writeln('min=',min:0:2,' расположен в строке ',imin);
end.

Добавлено через 4 минуты
В другой теме матрица [5,3], так что с этим разбирайтесь сами.

Новые блоги и статьи Все статьи Все блоги /
Создаем микросервисы с Go и Kubernetes golander 02.07.2025 Когда я только начинал с микросервисами, все спорили о том, какой язык юзать. Сейчас Go (или Golang) фактически захватил эту нишу. И вот почему этот язык настолько заходит для этих задач: . . .	C++23, квантовые вычисления и взаимодействие с Q# bytestream 02.07.2025 Я всегда с некоторым скептицизмом относился к громким заявлениям о революциях в IT, но квантовые вычисления - это тот случай, когда революция действительно происходит прямо у нас на глазах. Последние. . .	Вот в чем сила LM. Hrethgir 02.07.2025 как на английском будет “обслуживание“ Слово «обслуживание» на английском языке может переводиться несколькими способами в зависимости от контекста: * Service — самый распространённый. . .	Использование Keycloak со Spring Boot и интеграция Identity Provider Javaican 01.07.2025 Два года назад я получил задачу, которая сначала показалась тривиальной: интегрировать корпоративную аутентификацию в микросервисную архитектуру. На тот момент у нас было семь Spring Boot приложений,. . .	Содержание темы с примерами на WebGL 8Observer8 01.07.2025 Все примеры из книги Мацуды и Ли в песочнице JSFiddle Пример выводит точку красного цвета размером 10 пикселей на WebGL 1. 0 и 2. 0 WebGL 1. 0. Передача координаты точки из главной программы в. . .
Основы WebGL. Простой треугольник 8Observer8 01.07.2025 Простой треугольник без трансформаций. Для трансформаций можно использовать glMatrix, как в примере: https:/ / plnkr. co/ edit/ qT6ZTwvncLPRamK5?preview На русском: . . .	Полиглотные микросервисы на C# и .NET ArchitectMsa 30.06.2025 Полиглотная архитектура появилась не из желания усложнить жизнь разработчикам. Она родилась из практической необходимости решать разные задачи наиболее эффективным способом. В одном из проектов. . .	Стратегии кеширования Javaican 29.06.2025 Кеширование — это хранение часто запрашиваемых данных в быстром хранилище (обычно в памяти), чтобы не обращаться к более медленному первоисточнику. Казалось бы, все просто. Но за этой простотой. . .	Наблюдаемость приложений ASP.NET Core с OpenTelemetry, Prometheus и Grafana ArchitectMsa 29.06.2025 Наблюдаемость (observability) – это ключевое свойство современной системы, позволяющее понимать её внутреннее состояние на основе внешних данных. Если мониторинг отвечает на вопрос "что случилось?",. . .	Четыре главных модели отношений классов в с++ russiannick 28.06.2025 Продолжаю крестовый поход против c++. ideone. com/ юзаю для проверки валидности кода. Насчитал 4 модели отношений классов: одиночный класс, равноправные классы, слейв - мастер, терминатор. . . .

Опции темы