Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/2: Рейтинг темы: голосов - 2, средняя оценка - 4.50
krack666
0 / 0 / 0
Регистрация: 13.05.2009
Сообщений: 13
1

Нужна блок-схема к программе

13.05.2009, 21:39. Просмотров 457. Ответов 1
Метки нет (Все метки)

Дан двумерный массив 5на5.Вычислить произведение отрицательных элементов.Определить индецсы максимального элемента.

Текст программы:
Program Myprog;
uses crt;
var
A:array [1..5,1..5] of integer;
i,j,imax,jmax,max:integer;
p:integer;
begin
clrscr;
randomize;
for i:=1 to 5 do
begin
for j:=1 to 5 do
A[i,j]:=random (12) - 3;
end;
writeln('Исходная матрица:');
for i:=1 to 5 do begin
for j:=1 to 5 do begin
write(a[i,j]:5)
end;
writeln;
end;
p:=1;
for i:=1 to 5 do
for j:=1 to 5 do
if a[i,j]<0 then p:=p*a[i,j];
writeln('proizved otrizatelnih chisel=',p);
begin
max:=a[1,1];
imax:=1;
jmax:=1;
for i:=1 to 5 do
for j:=1 to 5 do
if a[i,j]>max then
begin
max:=a[i,j];
imax:=i;
jmax:=j;
end;
end;
writeln('max element matrici : ', 'ctroka=',imax,',ctolbez=',jmax);
readkey
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.05.2009, 21:39
Ответы с готовыми решениями:

Очень нужна блок-схема к программе
Кто откликнулся, спасибочки... Вот программа... const n=5; m=3; var a: array of integer; i,j:...

Блок-схема к программе
помогите пожалуйста написать блок-схему к программе: var MyArr:array of real; ...

Блок-схема к программе
Помогите пожалуйста. Нужно срочно сделать блок-схему. Кто сможет сделать, умоляю, пришлите сюда...

Блок схема по программе
Нужно составить блок схему Uses CRT; const nmax=5; mmax=5; str=5;

Блок схема по программе
uses crt; const n=15; m=8; var a,b:array of integer; i,j,imx,imn,sa,sb:integer;...

1
Puporev
Модератор
58524 / 44445 / 30686
Регистрация: 18.05.2008
Сообщений: 106,475
14.05.2009, 06:41 2
Схему перерисуй как вас учат. Транслит замени на русский, а то половина на русском, половина транслитом.
1
Вложения
Тип файла: doc Блок.doc (26.5 Кб, 25 просмотров)
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.05.2009, 06:41

Блок- схема по программе
помогите нарисовать блок схему по программе program vstavka_propuska; uses crt; var...

Блок схема к готовой программе
Привет! помогите построить блок схему к следующей программе. Задача: Текстовый файл содержит...

Необходима блок-схема к программе
Помогите, пожалуйста, сделать блок-схему. Задача: дан одномерный массив L, элементы которого...


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

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

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