Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
1 / 1 / 0
Регистрация: 02.10.2018
Сообщений: 30
1

Какое должно быть условие в данной программе?

10.12.2018, 16:30. Показов 495. Ответов 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
program help;
 
const
 
   m = 2;
   n = 2;
   w = 5;
 
var
   a: array[1..m, 1..n] of real;
   i, j: integer;
   max, s: real;
 
begin
   writeln('Задайте элементы матрицы'); 
   for i := 1 to m do 
      for j := 1 to n do 
         read(a[i, j]);
         
   for i := 1 to n do begin
 
      max := a[i, 1]; 
      for j := 1 to m do begin
         write(a[i, j]:w:0);
         if a[i, j] > max then 
            max := a[i, j];
      end;
      s := s + max;
      writeln(max:2*w:0);
 
   end;
   writeln('Сумма максимальных элементов строк=', s:0:0); 
end.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
10.12.2018, 16:30
Ответы с готовыми решениями:

Коллеги,в программе должно считать выделенные элементы. Считает программа неправильно(должно быть 69.Подскажитегдеошибка
#include <conio.h> #include <stdio.h> #include <stdlib.h> #include <windows.h> const int...

Как должна быть организована сеть офиса? Что должно быть настроено обязательно, а чего быть не должно?
Добрый день. Сразу оговорюсь, что я инженер-строитель и настройкой сети занимаюсь только потому,...

какое должно быть напряжение
между зеленым проводом и землей? на рабочем БП показывает 4.9в, на неисправном 1.16в.

Какое образование должно быть у программиста?
Если у меня будет диплом (высшее образование) по технической специальности, но не компьютерной...

1
Модератор
63406 / 47088 / 32457
Регистрация: 18.05.2008
Сообщений: 114,137
10.12.2018, 21:04 2
Pascal
1
2
3
4
5
6
7
writeln('Задайте элементы матрицы');
for i := 1 to m do
for j := 1 to n do
 begin
  write('a[',i,',',j,']=');
  readln(a[i, j]);
 end;
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.12.2018, 21:04

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

Дианостика, какое должно быть сопротивления на дроселях
Здравствуйте! Подскажите пожалуйста, сопротивление на дроселях ЦП 8 Ом, материнка LA-3581P Rev:1.0...

STM32 NRESET какое должно быть сопротивление?
Соорудил платку с STM32F100 - не заработала. Чип отказался определяться программатором. Именно этот...

Приложение уровня Junior, какое оно должно быть?
Здравствуйте, существует много тем, про то, что должен знать начинающий программист. Мой вопрос...

Какое минимальное основание должно быть у системы счисления
Ребятки помогите пожайлуста: Какое минимальное основание должно быть у системы счисления, чтобы в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

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