Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Помогите решить задачу в Паскале Дан двумерный массив. Найти сумму и количество положительных элементов, лежащих выше главной диагонали.

10-11 класс

Hlff 13 янв. 2015 г., 3:55:08 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Малая111
13 янв. 2015 г., 4:44:04 (9 лет назад)

var a: array [1..100,1..100] of integer;
i,j,s,sn,n,m:integer;
Begin
    read(n,m);
    for i:= 1 to n do
        for j:= 1 to m do begin
            read(a[i,j]);
            if (j>i) and (a[i,j]>0) then begin
                sn:=sn+1;
                s:=s+a[i,j];
            end;
        end;

    writeln(s,sn);
End.

Ответить

Другие вопросы из категории

2. Перевести число А10=241 в двоичную, восьмеричную и шестнадцатеричную систему счисления.3.Информационное сообщение объемом 4 Кбайта содержит 4096

символов. Сколько символов содержит алфавит, при помощи которого было записано это сообщение?

Помогите решить на С++.Грузовой автомобиль выехал из одного города в другой со скоростью v1 км/ч. Через

t ч в этом же направлении выехал легковой автомобиль со скоростью v2 км/ч. Составить программу, определяющую взаимное расположение автомобилей через t1 ч после выезда грузового автомобиля.

Сравните( поставьте знак отношения):

200 байт и 0.25 Кбайт
3 байт и 24 бита
1536 бит и 1.5 Кбайт
1000 бит и 1 Кбайт
8192 байта и 1 Кбайт

Читайте также

Составить программу на языке паскаль

задание: дана матрица А(N, N). Составить программу подсчета количества положительных элементов, расположенных выше главной диагонали

Помогите решить задачу на паскале: в двумерном массиве хранятся результаты (время в минутах), показанные каждым из 12 автогонщиков на каждом из

10 этапов соревнований «Формула-1». После 10 этапа участник с порядковым номером 4 выбыл из соревнований. Изменить массив так, чтобы в нем не было результатов бывшего гонщика.

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

строка символов р1, р2,
..., рn. Определить число вхождений в последовательность группы
букв "xyz". Вырезать
фрагмент из текста между первым и вторым вхождением группы символов "xyz".

Помогите решить две задачки (Паскаль)

Задание 1
В одномерном массиве случайных вещественных числе F(17) определить количество положительных элементов и их сумму.

Задание 2
В матрице L(5,5) случайных вещественных чисел определить максимальный элемент выше побочной диагонали, поменять его местами с элементом 2 строки 2 столбца.

Большая просьба расписать задачу подробно , хочу не просто списать решения , а понять его и научиться решать сам , огромное спасибо.

Написать программу на Pascal ABC.Дан целочисленный массив размера N. Вычислить сумму и количество положительных элементов,

произведение и количество отрицательных элементов, произведение элементов до
первого отрицательного. Отсортировать массив по возрастанию.



Вы находитесь на странице вопроса "Помогите решить задачу в Паскале Дан двумерный массив. Найти сумму и количество положительных элементов, лежащих выше главной диагонали.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.