Среднее арифметическое положительных элементов, лежащих выше побочной диагонали матрицы

@maksimelyan · Регистрация: 07.09.2016

Author24 — интернет-сервис помощи студентам

Кто может проверить,правильно ли выполнена задача?Условие-Вычислить среднее арифметическое положительных чисел, лежащих выше побочной диагонали.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
var
  i,j:byte; k,s:integer;  a:array[1..10,1..10] of integer;
begin
 randomize;
 for i:=1 to 10 do
 begin
    for j:=1 to 10 do
  begin
    a[i,j]:=random (100)-50;
    write(a[i,j]:5);
    end;
  writeln;
    end;
    s:=0;
    k:=0;
    for i:=1 to 10-1 do
    for j:=1 to 10-1 do
    if a[i,j]>0 then
  begin
    s:=s+a[i,i];
    k:=k+1;
    end;
    if k <> 0 then writeln('Среднее = ', s/k:0:3);
  end.

@Puporev · 27.11.2016, 09:02

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
const n=10;
var a:array[1..n,1..n] of integer;
    i,j,k:byte;
    s:integer;
begin
randomize;
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=-50+random (100);
    write(a[i,j]:4);
   end;
  writeln;
 end;
 s:=0;
 k:=0;
 for i:=1 to n-1 do
 for j:=1 to n-i do
 if a[i,j]>0 then
  begin
   s:=s+a[i,j];
   k:=k+1;
  end;
if k=0 then write('Положительных элементов выше побочной диагонали нет')
else write('Среднее арифметическое положительных элементов выше побочной диагонали=',s/k:0:3)
end.

Новые блоги и статьи Все статьи Все блоги /
Async/await в Swift: Асинхронное программирование в iOS mobDevWorks 20.03.2025 Асинхронное программирование долго было одной из самых сложных задач для разработчиков iOS. В течение многих лет мы сражались с замыканиями, диспетчеризацией очередей и обратными вызовами, чтобы. . .	Сложность Колмогорова: Приёмы упрощения кода ArchitectMsa 20.03.2025 Наверное, каждый программист хотя бы раз сталкивался с кодом, который напоминает запутанный лабиринт — чем дальше в него погружаешься, тем сложнее найти выход. И когда мы говорим о сложности кода, мы. . .	PostgreSQL в Kubernetes: Подготовка кластера и настройка Mr. Docker 20.03.2025 Когда доходит до контейнеризации баз данных и особенно таких требовательных к ресурсам системах как PostgreSQL, многие команды до сих пор колеблются, прежде чем перенести их в контейнерную. . .	C++26: Индексирование пакетов и метапрограммирование bytestream 20.03.2025 Эволюция C++ продолжается стремительными темпами – каждый новый стандарт приносит функциональность, о которой мы мечтали годами. Звучит слишком громко? Если вы когда-либо боролись с вариадическими. . .	Состояние гонки в C#: подводные камни многопоточного программирования UnmanagedCoder 20.03.2025 Что такое состояние гонки? Это ситуация, когда результат программы непредсказуемо меняется в зависимости от порядка выполнения потоков. Проще говоря, два или более потока пытаются одновременно. . .
Next.js для разработки React: преимущества серверного рендеринга Reangularity 20.03.2025 Next. js решает классическую проблему React-приложений: медленную первоначальную загрузку и плохую индексацию поисковиками. Вместо того чтобы заставлять браузер пользователя выполнять всю работу по. . .	JUnit или TestNG: Выбираем Java-фреймворк для тестирования Javaican 20.03.2025 История тестовых фреймворков в Java началась в конце 90-х, когда Кент Бек и Эрих Гамма разработали JUnit - инструмент, который перевернул представление разработчиков о модульном тестировании. JUnit. . .	Разбиваем монолит на два микросервиса и реализуем CI/CD ArchitectMsa 20.03.2025 Когда команда растет, а функциональность монолита расширяется, поддерживать и развивать такую систему становится все труднее. Разработчики начинают тратить много времени на разбор сложных. . .	Python и PDF: Создание и редактирование файлов py-thonny 20.03.2025 Работа с PDF-документами – одна из популярных задач в современной разработке. Python предлагает несколько инструментов для создания, чтения и редактирования PDF-файлов, среди которых особенно. . .	Корутины в Unity и производительность WaitForSeconds GameUnited 20.03.2025 Разработчики игр на Unity часто сталкиваются с вопросом: как выполнять действия через определённые промежутки времени, не блокируя основной поток игры? Тут как раз и приходят на помощь корутины —. . .

Опции темы