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

Дан массив размерностью 4х6. Написать программу вычисления произведения максимального и минимального элементов массива

08.12.2020, 07:13. Просмотров 567. Ответов 0


Помогите пожалуйста составить программу
Дан массив размерностью 4х6. Написать программу вычисления произведения максимального и минимального элементов массива.

Добавлено через 31 минуту
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
program prg;
uses crt;
const n=3;
var a:array[1..4,1..6]of integer;
    i,j,max,min:integer;
begin
for i:=1 to 4 do
for j:=1 to 6 do
a[i,j]:=random(100);
for i:=1 to 4 do
for j:=2 to 6 do
if a[i,j]>max then max:=a[i,j];
writeln('Максимальный элемент: ',max);
min:=a[1,1];
for i:=1 to n do
for j:=2 to n do
if a[i,j]<min then min:=a[i,j];
writeln('Минимальный элемент: ',min);
writeln('Произвидение минимального и максимального элеиента: ',max*min);
readln()
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.12.2020, 07:13
Ответы с готовыми решениями:

Дан массив A(NxM) с элементами вещественного типа. Написать программу для вычисления произведения элементов массива, мод
Дан массив A(NxM) с элементами вещественного типа. Написать программу для вычисления произведения...

Дан массив из 100 целых чисел. Написать программу нахождения произведения отрицательных элементов массива
Помогите пожалуйста)

Дан одномерный массив найти разность максимального и минимального элементов массива
Нужен код для командного приложения на Лазарусе и если возможно комментарии...

Написать программу нахождения максимального и минимального элементов массива
Написать программу нахождения максимального и минимального элементов массива. Поиск элементов...

0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.12.2020, 07:13

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

Дан массив размера 5 x 6 с элементами целого типа. Написать программу для вычисления числа элементов массива кратных 3
procedure TForm1.Button1Click(Sender: TObject); var i,j: byte; sum: real; A:array of...

Дан массив действительных чисел. Вычислить среднее арифметическое минимального и максимального элементов данного массива
Дан массив действительных чисел. Вычислить среднее арифметическое минимального и максимального...

Написать программу, которая вычисляет разность максимального и минимального элементов массива
Написать программу, которая вычисляет разность максимального и минимального элементов массива. ...

Написать программу вычисления произведения чётных элементов одномерного массива
Здравствуйте! Обращаюсь к Вам за помощью. Нужно написать следующую программу: Буду благодарна за...

Написать рекурсивную программу вычисления произведения элементов од- номерного целочисленного массива A из n э
Сделал программу, но выдаёт ошибку((... Помогите исправить: type Mas=array of...

Массив: Составить программу определения максимального и минимального элементов заданного массива.
составить программу для ввода с клавиатуры данных для 25 элементов массива W, их распечатки по 4...


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

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

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