С Новым годом! Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.54/13: Рейтинг темы: голосов - 13, средняя оценка - 4.54
1 / 1 / 0
Регистрация: 27.12.2011
Сообщений: 34

Массивы,генерация случайных чисел

16.06.2012, 23:25. Показов 2596. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Задать размерность (число строк и столбцов), минимальное и максимальное значения элементов динамического двумерного массива (количество элементов может изменяться в ходе выполнения одной и той же программы).
1 Задать тип массива в программном коде.
2 Ввести элементы массива A(n,n) с помощью генератора случайных чисел.
3 Вывести образованный массив на экранную форму и в текстовое окно.
4 Найти сумму элементов, расположенных на главной диагонали матрицы.
5 Выполнить пп. 1 – 4 для своего варианта.
отношение суммы главной и побочной диагоналей, n=8; min = –32;
max = –12;
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
16.06.2012, 23:25
Ответы с готовыми решениями:

Генерация случайных чисел.
1. Получить случайным образом 10 цифр , моделирующие стоимость игральных карт (случайное число от 6 до 14). Результат вывести в виде числа...

Анализ и генерация случайных чисел
Запрограммировать получение трёх последовательностей N случайных чисел (N={100,1000,10000}) с накоплением статистики о них . По результатам...

Генерация случайных чисел без повторений
Как сделать, чтобы датчик произвольных чисел генерировал элементы без повторений?

1
Лучи добра
 Аватар для Das Gespenst
173 / 171 / 191
Регистрация: 08.06.2012
Сообщений: 292
17.06.2012, 13:59
Лучший ответ Сообщение было отмечено ButterflyOnAFir как решение

Решение

Как-то так будет, думаю.
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
30
program z;
uses crt;
var i,j,max,min,n,s:integer;
a:array [1..100,1..100] of integer;
begin
     write('Ðàçìåðíîñòü ìàòðèöû: ');
     readln(n);
     write('Min ýëåìåíò ìàòðèöû: ');
     readln(min);
     write('Max ýëåìåíò ìàòðèöû: ');
     readln(max);
     clrscr;
     randomize;
     writeln('Ñëó÷àéíàÿ ìàòðèöà');
     for i:=1 to n do
         begin
              for j:=1 to n do
                  begin
                       a[i,j]:=trunc((max-min)*random+min);
                       write(a[i,j],' ');
                  end;
              writeln;
         end;
     for i:=1 to n do
         for j:=1 to n do
             if i=j
                then
                    s:=s+a[i,j];
     writeln('Ñóììà ýëåìåíòîâ ãëàâíîé äèàãîíàëè - ',s);
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
17.06.2012, 13:59
Помогаю со студенческими работами здесь

Генерация значений массива с помощью датчика случайных чисел
Задание: Разработать программу для обработки массива, обеспечив выполнение следующих операций: 1 Ввод значений массива с клавиатуры и...

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

Генерация случайных чисел
Помогите пожалуйста написать программу генерации случайных чисел мультипликативным методом: Xi=modk*(A*Xi-1+B).

Генерация случайных чисел от -10 до 10
Помогите пожалуйста. Мне нужно составить программу, генерирующая случайные числа в диапазоне от -10, до 10 и найти среди всех этих чисел...

Генерация случайных чисел
Сгенерировать 10 целых чисел из промежутка: 1) от 0 до 20, 2)от 10 до 40. Программа Лазарус. Помогите пожалуйста.


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
Модель микоризы: классовый агентный подход 3
anaschu 06.01.2026
aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ФедосеевПавел 06.01.2026
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .
Модель микоризы: классовый агентный подход 2
anaschu 06.01.2026
репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
Расчёт токов в цепи постоянного тока
igorrr37 05.01.2026
/ * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .
Новый CodeBlocs. Версия 25.03
palva 04.01.2026
Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru