Массивы, блок-схема

15.05.2009, 19:56. Показов 662. Ответов 0

Метки нет (Все метки)

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

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
program nom_51;
uses crt;
var
A: array [1..7,1..7] of integer;
i,j,vih:integer;
begin;
clrscr;
randomize;
write('Ishodnii massiv A: ');
writeln('');
for i:=1 to 7 do
 for j:=1 to 7 do
  A[i][j]:=random(20);
for i:=1 to 7 do
 begin
 for j:=1 to 7 do
 write (A[i][j],' ');
 writeln;
 end;
vih:=1;
for i:=1 to 7 do
for j:=1 to 7 do
if ((A[i][j]=A[j][i]) and (vih<>0)) then vih:=1 else vih:=0;
if vih=0 then writeln('ne simmetrichnaya') else writeln('simmetrichnaya');
readkey;
end.

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

15.05.2009, 19:56

Ответы с готовыми решениями:

блок-схема (массивы)
Для заданной квадратной матрицы С вычислить сумму и число элементов матрицы, находящихся под главной диагональю. Исходную матрицу вывести в...

блок-схема МАССИВЫ
помогите пож-ста сделать блок схему из за 2 задач отчёт не получится сдать ..вот одна из них const n=4; var a,b:array of integer; ...

Одномерные массивы (блок-схема, псевдокод)
Здравствуйте! Помогите пожалуйста написать блок-схему и псевдокод к программе, которая вводит с клавиатуры одномерный массив из 5 целых...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

15.05.2009, 19:56

Помогаю со студенческими работами здесь

Блок-схема.Массивы
заданиe. В массиве c, заполненном случайным образом, найдите сумму главной и побочной диагоналей, если сумма главной диагонали меньше...

Блок-схема. массивы.
Срочно нужна блок-схема на данное задание : "Составить программу нахождения наибольшего среди тех элементов одномерного массива А, что...

Блок-схема по теме Динамические массивы и указатели в С++
Помогите пожалуйста нарисовать блок-схему к данной программе: #include <stdio.h> #include <conio.h> int main() { int k,...

Блок-схема (схема нуждается в проверке)
Блок-схемы чертить никогда не умел, поэтому прошу помощи у знатоков. Нашёл в инэте прогу, которая схемы строит автоматически, по коду, но...

Блок схема ( схема алгоритма )
Доброго времени суток . Есть вот такая програмка : bool checktwo(const int x); int main(){ for (int i=1000; i<10000; i++)...

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .

Наверх