сервис вопросов и ответовНапишите программу, которая задает трехмерный массив и находит в нем наибольшее число. ( pascal ). Буду очень рад, если прокомментируете, очень хочу
10-11 класс|
|
разобраться.
Панда14
09 февр. 2015 г., 14:31:34 (9 лет назад)
Markus8605
09 февр. 2015 г., 16:52:30 (9 лет назад)
const
n = 3;
var
a:array[1..n, 1..n, 1..n] of integer; //объявляем трехмерный массив размерности N x N x N
i, j, k, max:integer;
begin
randomize;
max := -maxint - 1; {присваисваем maxrcbvfkmyjve 'ktvtyne минимальное возможное значения типа integer}
for i := 1 to n do { с помощью трех циклов проходим по всем элементам массива, чобственно тоже самое что и с двумерным массивом только добаляемтся еще 1 цикл}
begin
writeln;
writeln('i = ', i); {выводм масссива производится в виде нескольких квадратных матриц тут указывается номер каждой квадратной матрицы}
for j := 1 to n do
begin
for k := 1 to n do
begin
a[i, j, k] := random(21) - 10; // генерируем случайное значение от -10 до 10
if a[i, j, k] > max then { если больше текущего максимального то станвится новым максимальным}
max := a[i, j, k];
write(a[i, j, k]:4); //выводим элемент массива
end;
writeln;
end;
end;
writeln('Максимальный элемент массива равен ', max);
end.
Ответить
Другие вопросы из категории
1.3 Школьники должны были посадить 200 деревьев. Они перевыполнили план посадки на 23%. Сколько деревьев они посадили? 1.4 Из 50 кг. семян,
собранных учениками, 17% составили семена клена, 15% – семе! липы, 25% – семена акации, а стальное – семена дуба. Сколько килограмм семян дуба собрали ученики?
Для передачи сигналов договорились использовать дымовые шашкис цветными дымами, поджигаемые последовательно. Одна последователь-ность дымов – один сигнал;
в каком порядке идут цвета – существенно.Какое количество различных сигналов можно передать поджиганием ровносеми дымовых шашек, если в запасе имеются шашки двух различных цветов(шашек каждого цвета не менее семи, цвет шашек в последовательностиможет повторяться)?
Сколько бит и байт надо, чтобы закодировать:
а) черно-белое изображение 50*50 точек;
б) цветное изображение 100*20 точек в системе RGB (до 256 цветов);
в) слово «информатика»;
г) число 12000.
Спасибо! И если можно, то поподробнее.
Читайте также
1)Напишите программу, которая строит "квадрат" из знаков '*' заданного размера. Используйте процедуру.
2)Напишите программу, которая выводит в столбик цифры введённого числа, начиная с последней. Используйте процедуру.
3)Напишите программу, которая выводит в одну строчку все делители переданного ей числа, разделяя их пробелами.
4)Напишите программу, которая выводит в столбик цифры введённого числа, начиная с первой. Используйте процедуру.
№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от 0 до 100. Напишите программу, которая позволит найти сумму
двузначных элементов массива, которые не оканчиваются на 3. №2. Дан массив из 100 элементов. Каждый элемент может принимать целочисленные значения от 1 до 500. Напишите программу, которая позволит найти и вывести минимальное значение среди элементов массива, которые делят максимальное значение элементов массива без остатка.
№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от -100 до 100. Напишите программу, которая позволит
подсчитать среднее арифметическое положительных элементов массива, которые кратны первому элементу массива. №2. Дан массив из 40 элементов. Каждый элемент может принимать целочисленные значения от 0 до 200. Напишите программу, которая позволит найти наиболее часто встречающийся элемент массива
Напишите программу, которая вычисляет НОД двух чисел. Используйте функцию.
Напишите программу, которая вычисляет НОК двух чисел. Используйте функцию.
1.Напишите программу, которая в последовательности натуральных чисел
определяет количество чисел, кратных 4. Программа получает на вход
количество чисел в последовательности, а затем сами числа. В
последовательности всегда имеется число, кратное 4. Количество чисел не
превышает 1000. Введённые числа не превышают 30 000. Программа должна
вывести одно число — количество чисел, кратных 4.
2. Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3. Количество чисел не превышает 1000. Введённые числа не превыша ют 30 000. Программа должна вывести одно число — минимальное число, кратное 3.
Вы находитесь на странице вопроса "Напишите программу, которая задает трехмерный массив и находит в нем наибольшее число. ( pascal ). Буду очень рад, если прокомментируете, очень хочу", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.