Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
RINACHI
0 / 0 / 0
Регистрация: 10.12.2017
Сообщений: 1
#1

Определить, сколько раз встречается заданное число выше главной диагонали матрицы - Turbo Pascal

10.12.2017, 13:06. Просмотров 62. Ответов 1
Метки нет (Все метки)

1. Дана квадратная матрица А(n,n), n>6. Определить сколько раз встречается число, введенное с клавиатуры, в массиве элементов, находящихся выше главной диагонали матрицы.
2. Выполнить сортировку элементов, расположенных ниже побочной диагонали матрицы по убыванию.


Программа должна содержать:

⦁ Ввод данных автоматически или с клавиатуры
⦁ Вывод результатов на монитор

есть такая часть проги

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
                                      program mas1;
uses crt;
var
j,i,m,k,n:integer;
a:array[1..100,1..100] of integer;
BEGIN
randomize;
clrscr;
writeln('Решение задачи на массивы ');
writeln('---------------------------');
 write('Ввести размер квадратной матрици M--> ');
 readln(m);
 writeln('Исходный массив ');
 for i:=1 to m do begin
 for j:=1 to m do begin
 a[i,j]:=random(11);
 write(a[i,j]:3);
 end;
 writeln; end;
 write('Выбери число выше главной диагонали '); readln(k);
 n:=0;
 for i:=1 to m do
 for j:=i+1 to m do
 if a[i,j] = k then n:=n+1;
 writeln('n = ',n);
 writeln('Конец задачи ');
 readln;
END.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.12.2017, 13:06
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Определить, сколько раз встречается заданное число выше главной диагонали матрицы (Turbo Pascal):

Определить, сколько раз встречается в массиве заданное число - Turbo Pascal
Дан массив из n элементов. определить сколько раз встречается число 5 среди элементов массива помогите

Дан массив А(п), состоящий из целых чисел. Определить сколько раз в нём встречается заданное целое число n - Turbo Pascal
Дан массив А(п), состоящий из целых чисел. Определить сколько раз в нём встречается заданное целое число n.

Дан массив А(п), состоящий из целых чисел. Определить сколько раз в нём встречается заданное целое число n - Turbo Pascal
Дан массив А(п), состоящий из целых чисел. Определить сколько раз в нём встречается заданное целое число n

Двумерные массивы.Определить, сколько раз встречается число 1 среди элементов третьей строки матрицы. - Turbo Pascal
Помогите пожалуйста сделать программу чтобы определить, сколько раз встречается число 1 среди элементов третьей строки матрицы.

Определить, сколько раз в тексте встречается заданное слово - Turbo Pascal
дан текст с клавиатуры. определить сколько раз в тексте встречается данное слово. учесть тот факт, что первая буква может быть заглавной...

Определить, сколько раз в тексте встречается заданное слово - Turbo Pascal
всем привет!) народ помогите поааалуйста а то голова не варит: сколько раз в тексте встречается заданное слово(слова разделены...

1
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3783 / 2770 / 1895
Регистрация: 05.06.2014
Сообщений: 13,522
11.12.2017, 08:47 #2
2-я часть (подправьте под свое условие)
Выполнить сортировку элементов, расположенных выше побочной диагонали матрицы по убыванию
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.12.2017, 08:47
Привет! Вот еще темы с ответами:

Дана целочисленная матрица размера 4х4. Определить, сколько раз встречается число 7 в первом столбце данной матрицы - Turbo Pascal
Вот... Дана целочисленная матрица размера 4х4. Определить, сколько раз встречается число 7 в первом столбце данной матрицы.

Определить, сколько раз в заданной строке встречается заданное слово - Turbo Pascal
Разработать программу, которая подсчитывает, сколько раз в заданной строке встречается некоторое слово. Слова не разделены пробелами. Прощу...

Определить сколько раз встречается заданное слово во введенном тексте - Turbo Pascal
Ввести текст.Определить сколько раз встречается заданное слово.Паскаль

Ввести текст. Определить, сколько раз в тексте встречается заданное слово - Turbo Pascal
Помогите.Ввести текст.Определить,сколько раз в тексте встречается заданное слово.Спасибо!)


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru