Все
Математика
Алгебра
Геометрия
Литература
Русский язык
Истоки
Краеведение
Французский язык
Литературное чтение
Астрономия
Природоведение
Родной край
Немецкий язык
Технология
Физика
Английский язык
Обществознание
Химия
Биология
История
О`zbek tili
Окружающий мир
Естествознание
География
Украинский язык
Информатика
Украинская литература
Казахский язык
Физкультура и спорт
Экономика
Музыка
Право
Белорусский язык
МХК
Кубановедение
ОБЖ
Психология
Кыргыз тили
Другие предметы
Показать все предметы
Вишеслава
27.11.2021, 08:16
Информатика

Сформировать вещественную матрицу 5х5. Вычислить произведение отрицательных элементов, находящихся над и под главной диагональю матрицы.

Знаешь ответ?

Чтобы оставить ответ, или зарегистрируйтесь.

Ответ или решение 1
Ивани
program Project1; const N=2; var a: array [1..N, 1..N] of real; i, j: integer; p1, p2: real; begin Randomize; p1:=1; p2:=1; for i:= 1 to N do begin for j:= 1 to N do begin a[i,j]:= -5+10*Random; Write(a[i,j]:6:2); if a[i,j]<0 then begin if j>i then p1:=p1*a[i,j]; if j