Добре дошли!

Добре дошли в нашите форуми, пълни с полезна информация. Имате проблем с компютъра или телефона си? Публикувайте нова тема и ще намерите решение на всичките си проблеми. Общувайте свободно и открийте безброй нови приятели.

Моля, регистрирайте се за да публикувате тема и да получите пълен достъп до всички функции.

Помощ за блок схема

Последователи

6 май 200917 г.

program index;

const

a:array[1..3,1..3] of integer=((1116,50,1180),(6345,5556,123),(56,45,2345));

var

i,j,k,p,l:integer;

begin

p:=a[1,1];

for i:=1 to 3 do

for j:=1 to 3 do

if a[i,j]>p then

begin

p:=a[i,j];

k:=i;

l:=j;

end;

writeln(p,',',k,',',l);

end.

Това е една програмка, която търси най-голямата стойност в двумерен масив и запомня индексите му. Моля, ако някой може да ми помогне с блок схемата, че съвсем се обърках с тези цикли.

Не се мъчете. Вече направи нещо подобно на блок схема. Дано е вярна.

Редактирано 6 май 200917 г. от vladko (преглед на промените)