Сформировать двумерный массив А(5,4). Всем четным элементам полученного массива присвоить значение максимального элемента данного массива.
5-9 класс
|
На паскале, если не на паскале нужно, то укажите какой необходим.
const m = 5;
n = 4;
var i, j, max: integer;
a: array[1..m, 1..n] of integer;
begin
writeln('Исходный массив: ');
for i := 1 to m do begin
for j := 1 to n do begin
a[i, j] := random(20);
write(a[i, j]:3);
if(a[i, j] > max) then max := a[i, j];
end;
writeln;
end;
writeln('Максимальный элемента: ', max);
writeln('Конечный массив: ');
for i := 1 to m do begin
for j := 1 to n do begin
if(a[i, j] mod 2 = 0) then a[i, j] := max;
write(a[i, j]:3);
end;
writeln;
end;
end.
Другие вопросы из категории
2.Преобразование изображений или звука в набор дискретных значений в виде кодов называют?
а) кодированием
б)дискретизацией
в)информатизацией
г)декодированием
3.За единицу количества информации принимается:
а)килобайт
б)байт
в)бит
г)бод
д)кг
4. Выберети и соотнесите номера правильно:
1)распечатывает тексты
2)преобразует цифровой сигнал в аналоговый с последующей его передачей по аналоговой сети
3)преобразует звуковой сигнал в электрический сигнал
4)манипулятор, служащий для ввода ввода информации
5)кристал вместе с нанесенной на него интегральной схемой
6)устройство для получения изображений
7)устройство ввода информации в компьютер
8)служит для подключения компьютера к локальной сети
а)модем
б)мышь
в)чип
г)сканер
д)принтер
е)микрофон
ж)клавиатура
з)коммутатор
5.Какое число в десятичной системе счисления может обрабатывать 8-ми- разрядная электронная машина, например 00001111?
Читайте также
1 2 3 4 5 6 7 8
7 0 -8 -4 2 16 -10 2
А
Определите:
А) размерность массива;
Б) значение элемента А[3];
В) значение максимального элемента массива;
Г) индекс первого отрицательного элемента массива;
Д) индекс элемента, значение которого равно -4;
Е) Значение минимального элемента массива;
Ж) количество элементов массива, значения которых равно 2.
2.Привести пример отрицательного элемента массива с четным индексом.
3.Найти значение переменной Р.
p:=1;
For i:=3 to 5 do
p:=p*(2*i);
write(p);
4.
i:=2; s:=0;
while i<=8 do
begin
s:=s+s/2;
i:=i+2;
end;
write(s);
2. Создать массив A из 10 элементов, заполненный случайным образом числами принадлежащих промежутку (0;20). Вывести полученный массив на экран. Вычислить количество элементов массива, значения которых не превышают среднее арифметическое значений его элементов.
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.
Сформировать массив из 8 случайных вещественных чисел,принадлежащих промежутку {20;21) и вывести элементы этого массива в столбик в обратном порядке.