Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
0 / 0 / 0
Регистрация: 19.05.2013
Сообщений: 3

Вычислить сумму и число элементов матрицы, находящихся над главной диагональю (окрасить цветом)

19.05.2013, 00:18. Показов 1513. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Задали курсач одно из заданий:
Обработать матрицу, элементами которой являются случайные значения функции f(x)= (x2+2), x [10;75]. Вывести на печать исходную матрицу и полученные результаты. Дана матрица D (10, 10). Вычислить сумму и число элементов матрицы, находящихся над главной диагональю (окрасить цветом).
буду крайне признателен! а если еще и сделайте сноски что бы я сам разобрался это просто великолепно будет !
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
19.05.2013, 00:18
Ответы с готовыми решениями:

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

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

Вычислить сумму и число положительых элементов матрицы A[N,N], находящихся над главной диагональю
вычислить сумму и число положительых элементов матрицы A, находящихся над главной диагональю

2
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,168
19.05.2013, 10:11
Лучший ответ Сообщение было отмечено Dimka68RUS как решение

Решение

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
28
29
uses crt;
const n=10;
var D:array[1..n,1..n] of integer;
    i,j,k,s,x:integer;
begin
randomize;
writeln('Ìàòðèöà');
k:=0;
s:=0;
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    x:=10+random(66);
    D[i,j]:=x*x+2;
    if j>i then
     begin
      textcolor(12);
      k:=k+1;
      s:=s+D[i,j]
     end
    else textcolor(0);
    write(D[i,j]:5)
   end;
  writeln
 end;
writeln('Ñóìà ýëåìåíòîâ âûùå ãäàâíîé äèàãîíàëè=',s);
write('Èõ êîëè÷åñòâî=',k)
end.
1
0 / 0 / 0
Регистрация: 19.05.2013
Сообщений: 3
20.05.2013, 16:52  [ТС]
все работает всем спасибо) щас буду делать пояснения что где и как работает )

 Комментарий модератора 
Если какой-либо пост на форуме показался вам полезным, нажмите кнопку "Спасибо" внизу самого поста
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
20.05.2013, 16:52
Помогаю со студенческими работами здесь

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

Найти наибольшее из значений элементов находящихся над главной диагональю матрицы
Дана квадратная матрица порядка N.Найти наибольшее из значений элементов находящихся над главной диагональю.

Вычислить сумму элементов массива над главной диагональю
Вычислить сумму элементов массива над главной диагональю. Заранее спасибо:)

Найти среднее положительных элементов матрицы, сумму элементов над главной диагональю
Дается двумерный массив R, n, m <= 12. Сделайте программу которая определяет и возвращает результат через переменную S: a) Средний...

Вычислить количество положительных и отрицательных элементов над главной диагональю матрицы
Необходимо решить задачу: Дана целочисленная матрица N*N где N<=20 Вычислить количество положительных и отрицательных элементов над...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru