Нужно задать массив 3х4 случайными числами и по диагонали (сверху- вниз, слева-направо) определить их сумму и определить максимальное число.
10-11 класс
|
var
i,j,s,max:integer;
a: array[1..3,1..4] of integer;
begin
randomize;
write('Исходный массив:');
for i:=1 to 3 do
begin
writeln;
for j:=1 to 4 do
begin
a[i,j]:=random(10);
write(a[i,j]:2);
if i=j then
begin
if a[i,j]>max then max:=a[i,j];
s:=s+a[i,j]
end
end
end;
writeln;
writeln('Сумма ',s,'; максимальное число ',max)
end.
Условие правильно? А то, когда говорят о диагонали, то подразумевается квадратная матрица.
Если честно, не сзнаю как еще объяснить.
Ну если условие переписала правильно, тогда сейчас попробую
Другие вопросы из категории
В первый столбец вбиваем количество выстрелов, а во втором количество попаданий и в третьем столбце процент попаданий.
И еще один ответ, сколько нужно еще раз выстрелить положительно, чтобы стало больше на 1 процент.
Даны действительные числа a1,......, a24. Получить последовательность b1,........, b10, где b1=a1+a2+.....+a24, b2= a1^2+a2^2+.......+a24^2,........ b10=a1^10+a2^10+.......+a24^10.
а)из текстовой-в графическую
б)из графической-в текстовую
в)из зрительной-в звуковую
г)из звуковой-в зрительную
число А10= 387 в двоичную, восьмеричную и шестнадцатеричную систему счисления.
3.Сообщение
составленное, с помощью 64—символьного алфавита, содержит 870 символов. Какой
объем информации оно несет?
4.Объем
видеопамяти равен 2 Мб, битовая глубина — 24, разрешающая способность дисплея —
1600×1024. Какое максимальное количество страниц можно использовать при этих
условиях?
5. Одна
минута записи звуковой информации занимает на диске 1,3 Мбайта, глубина
кодирования равна 8. С какой частотой дискретизации записан звук?
2)Подсчитать,сколько места будет занимать одна минута цифрового звука на жёстком диске или любом другом цифровом носителе,записанного с частотой 44 кГц и разрядностью 8 бит.
Читайте также
вывести слово «нет». Пример. N = 12 345, М = 12360. Число 12 360 делится на число 15 — сумму цифр числа N
дестяричную
Три двоичных числа перевести в 16-ую систему,вычислить их сумму и перевести в десятичную систему
Три двоичных числа,перевести в 8-ую систему,а затем в 16-ую.
индексами. выведите на экран исходный массив и полученное среднее арифметическое.
2. Задайте массив из 10 элементов с помощью датчика случайных чисел. замените все элементы с четными индексами максимальными. Выведите на экран исходный и измененный массивы
Нужно задать массив целых чисел. Вывести на экран только те значения элементов массива, которые встречаются в нем более одного раза, при этом каждое найденное значение должно быть распечатано столько раз, сколько оно встречается.
1 ввести с клавиатуры последовательность из N чисел и найти максимальное число среди элементов стоящих на чётных местах.
2 Выяснить является ли натуральное число K степенью 3.