сервис вопросов и ответовДан массив mxm. Найти сумму элементов тех столбцов, у которых диагональный элемент равен нулю.
10-11 класс|
|
Langepas86mail
14 февр. 2014 г., 15:47:19 (10 лет назад)
Sofi51115
14 февр. 2014 г., 16:43:05 (10 лет назад)
Program PR1;
uses crt;
var mas:array[1..10,1..10] of integer;
i,j,b:integer;
Begin
clrscr;
randomize;
for i:=1 to 10 do
for j:=1 to 10 do mas[i,j]:=random(10);
for i:=1 to 10 do
for j:=1 to 10 do begin
gotoxy(j,i);
write(mas[i,j]);
end;
b:=0;
for i:=1 to 10 do
for j:=1 to 10 do if (j=i) and (mas[i,j]=0) then b:=b+mas[i,j];
writeln;
writeln(b);
end.
Ответить
Другие вопросы из категории
написать программу на паскале Треугольник задан координатами (x1, y1), (x2, y2), (x3, y3)
своих вершин. Вычислить радиус окружности, вписанной в треугольник
Составить программу в Pascal
(n+m)*(n+2m)*(n+3m)*...*(n+m^2)
Помогите пожалуйста, срочно!!
1. Какие из этих чисел можно отнести к двоичной, восьмеричной, десятичной и шестнадцатеричной системам счисления?
a. 254
b. 54
c. 1257
d. 84762
e. FA5D
f. E8A
g. 55
h. 879
i. 478
j. 19
Читайте также
1.Дан целочисленный массив X(N). Найти сумму четных элементов массива .Если эта сумма больше заданного числа Z , то у элементов , расположенных на
нечетных местах , сменить знак на противоположный ,иначе выдать соответствующее сообщение.
2.Дан массив X(N,M) . Среди четных столбцов массива найти сумму положительных элементов
3.Найти произведение элементов каждого столбца массива принадлежащих промежутку [2,6] . Из полученных значений сформировать одномерный массив.
Паскаль. 12.Дан массив А(3*4). Найти сумму первых отрицательных элементов в каждом столбце. 13.Даны два массива А(3*3)
и В(3*3). Вывести на экран тот из них, у которого меньше сумма элементов главной диагонали.
17.Дан массив А(3*4). Заменить все отрицательные элементы на противоположные.
1)дан одномерный массив из 5 элементов.найти сумму положительных элементов. 2)Дан одномерный массив из 7
элементов.Найти колличество четных положительных элементов.
3)Дан массив из 6 элементов.Найти произвдение положительных из них.
№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от 0 до 100. Напишите программу, которая позволит найти сумму
двузначных элементов массива, которые не оканчиваются на 3. №2. Дан массив из 100 элементов. Каждый элемент может принимать целочисленные значения от 1 до 500. Напишите программу, которая позволит найти и вывести минимальное значение среди элементов массива, которые делят максимальное значение элементов массива без остатка.
Дан массив X(N).Найти среднее арифметическое элементов массива,значения которых заключены в интервале [-3;3]. Если эта величина больше
заданного числа Z,то найти сумму четных элементов,иначе- произведение нечетных элементов.
Друзья,очень нужна ваша помощь,пожалуйста,если Вы решили мне помочь-отпишитесь. Заранее спасибо!
Вы находитесь на странице вопроса "Дан массив mxm. Найти сумму элементов тех столбцов, у которых диагональный элемент равен нулю.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.