Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Уменьшить элементы матрицы на 5. Найти значение максимального и минимального элемента https://www.cyberforum.ru/ pascalabc/ thread139589.html
Уменьшить элементы двумерного массива на 5. Найти в получившимся массиве значение максимального и минимального элемента.
Сортировка одномерного массива Pascal ABC
Составьте программу, упорядочивающую элементы массива, состоящие на нечётных местах в возростающем порядке, а на нечётных в убывающем...
Pascal ABC Не большое задание по Pascal ABC https://www.cyberforum.ru/ pascalabc/ thread139501.html
Сформировать случайным образом двумерный целочисленный массив а, вывести на экран. Найти максимальный и минимальный элемент массива. Щас сижу на паре, помогите пожалуйста.
Pascal ABC Паскаль графика.Нужно изменить программу https://www.cyberforum.ru/ pascalabc/ thread139493.html
Нужно изменить программу так,чтобы расчет масштаба,деления и подписи делений раставлялись автоматически в зависимости от масштабаProgram z15; uses graphabc; var y,x:real; begin line (0,300,600,300); line (200,0,200,600); line (200,0,195,5); line (200,0,205,5); line (600,300,595,305);
Pascal ABC Не работает, семестровое задание
Ввести с клавиатуры целое число. �� Если остаток от деления этого числа на 5 равен 1, то преобразовать заданную целочисленную матрицу 4x4 Z путем умножения каждого элемента матрицы на наибольший элемент 3-й строки. Найти S – сумму элементов 4-го столбца преобразованной матрицы. �� Если остаток от деления этого числа на 5 равен 3, то создать целочисленный файл F1. Найти среднее...
Pascal ABC Добавить по одному делению в зависимости от масштаба https://www.cyberforum.ru/ pascalabc/ thread139129.html
Помогите добавить поодному делению автоматически взависимости от масштаба uses GraphABC; Var w:string; y,x,dx,x1,xk,y3,y4:real; s,g,f,l:integer; mx,my,px,py,x0,y0,m,q,t:integer; begin Writeln('Введите масштаб по х:');
Pascal ABC Найти произведение положительных элементов матрицы в заданной области Написать в PascalABC и в Intal 1. Дана квадратная матрица A(nхn). Найти произведение положительных элементов матрицы в заданной области. 2. Дан текст, слова которого отделяются друг от друга пробелами. Первое по порядку самое короткое слово заменить первым по порядку словом, максимальным по длине, если слов, минимальных по длине — два. В противном случае текст оставить без изменения.... https://www.cyberforum.ru/ pascalabc/ thread138698.html Pascal ABC Разработать программу, которая в заданной строке, представляющей собой арифметическое выражение, находит и выводит на экран все встречающиеся числа (д
Разработать программу, которая в заданной строке, представляющей собой арифметическое выражение, находит и выводит на экран все встречающиеся числа (для простоты числа будем использовать только целые неотрицательные, количество разрядов может быть различно).
Pascal ABC Преобразовать массив по правилу https://www.cyberforum.ru/ pascalabc/ thread138661.html
Заполнить одномерный массив из N элементов случайными целыми числами. Преобразовать его в массив, в первой части которого будут элементы меньше среднего арифметического, а во второй части – элементы больше среднего арифметического. Первую часть подкрасить синим цветом, вторую – красным.
Pascal ABC Вывести на экран массив, раскрасив зеленым цветом положительные элементы Заполнить одномерный массив из 15 элементов случайными целыми числами. Вывести на экран массив, раскрасив зеленым цветом положительные элементы, расположенные после первого четного элемента https://www.cyberforum.ru/ pascalabc/ thread138660.html
Определить, сколько лет долгожителю Pascal ABC
Долгожитель (возраст не менее 100 лет) обнаружил, что если к сумме квадратов цифр его возраста прибавить число дня его рождения, то как раз получится его возраст. Сколько лет долгожителю?
Pascal ABC как скопировать резульать виде полученого графика в Microsoft World https://www.cyberforum.ru/ pascalabc/ thread138549.html
как скопировать резульать виде полученого графика в Microsoft World Uses GraphABC; type mas= array of real; mas1=array of real; var ii:text; a: mas; h,x1,y1,x,y,b: mas1; vv,vz,k,i,j,m,n,l,r,max,mx,my,x0,y0,t: integer; f,g,s,q1,z,p: real;
773 / 578 / 324
Регистрация: 17.06.2009
Сообщений: 1,188
02.06.2010, 13:31 0

Уменьшить элементы двумерного массива на 5. Найти в получившимся массиве значение максимального и минимального элемента. - Pascal ABC - Ответ 773427

02.06.2010, 13:31. Показов 1261. Ответов 1
Метки (Все метки)

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

Решение

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
36
37
38
39
uses crt;
const n=5; m=6;
var a: array[1..n,1..m] of integer; 
     i,j: byte; min,max: integer;
begin
randomize;
clrscr;
writeln('исходный массив: ');
for i:=1 to n do
 begin
  for j:=1 to m do
   begin
    a[i,j]:=random(19)-9;
    write(a[i,j]:3);
   end;
  writeln;
 end;
 writeln;
 for i:=1 to n do
  for j:=1 to m do
   a[i,j]:=a[i,j]-5;
 max:=a[1,1];
 min:=max;
 for i:=1 to n do
   for j:=1 to m do
    begin
     if min>a[i,j] then min:=a[i,j];
     if max<a[i,j] then max:=a[i,j];
    end;
 writeln('получившийся массив: ');
 for i:=1 to n do
  begin
   for j:=1 to m do
    write(a[i,j]:3);
   writeln;
  end;
 writeln('min = ',min);
 writeln('max = ',max);
end.


Вернуться к обсуждению:
Уменьшить элементы двумерного массива на 5. Найти в получившимся массиве значение максимального и минимального элемента. Pascal ABC
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.06.2010, 13:31
Готовые ответы и решения:

Уменьшить элементы матрицы на 5. Найти значение максимального и минимального элемента
Уменьшить элементы двумерного массива на 5. Найти в получившимся массиве значение максимального и...

в массиве А [n] отрицательные элементы заменить на значение максимального элемента, нули – на значение минимального элемента.
в массиве А отрицательные элементы заменить на значение максимального элемента, нули – на значение...

Вычислить разность максимального и минимального элемента двумерного массива
вычислить разность максимального и минимального элемента двумерного массива

Поиск максимального и минимального элемента массива в одномерном массиве
Помогите решить задачу Поиск максимального и минимального элемента массива в одномерном массиве

1
02.06.2010, 13:31
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.06.2010, 13:31
Помогаю со студенческими работами здесь

В двумерном массиве найти индекс максимального и минимального элемента
Программа выдает ошибку: нельзя преобразовать тип real к integer. Суть программы: нужно в...

Найти частное от деления максимального и минимального элементов двумерного массива
Двумерный массив: Найти частное от деления максимального и минимального элементов двумерного...

Найти среднее арифметическое до минимального элемента и после максимального элемента массива
Дан массив F(11). найти среднее арифметическое до минимального элемента и после максимального...

Дан одномерный массив Е(10) элементы которого вводятся с клавиатуры. Подсчитать сумму максимального и минимального элемента в массиве Е.
Здравствуйте программисты) Меня не было всего лишь на паре тем по паскалю, и по этому не знаю...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru