Vývojový diagram – Delphi – Fórum – Programujte.com

Ahoj potřeboval bych pomoct mám ukol udelat program ten jsem udelal a ted mám ukol z toho udělat vývojový diagram ale to se mi vubec nedaří jestli by mi mohl někdo pomoct byl bych velmi rád celý program :

program SKOLA;

uses crt;
var a:array[1..99,1..99] of integer;
  l,s,m,n,i,j:integer;

  procedure vypocetpole;

begin
  randomize;
  for i:=1 to m do
           begin
                for j:=1 to n do
               begin
                a[i,j]:=random(99);
                write(' ',a[i,j]);
               end;
                writeln;
            end;

end;
begin
  clrscr;
  writeln('Zadej pocet radku: ');
  readln(m);
  writeln('Zadej pocet sloupcu: ');
  readln(n);
  writeln;
  vypocetpole;
  writeln;
  l:=0;
       for i:=1 to m do
                begin
                     for j:=1 to n do
                              begin
                                   if a[i,j] mod 2=0 then s:=s+a[i,j] else l:=l+1;
                              end;
                end;
       writeln;
       writeln('Pocet lichych prvku je: ',l);
       writeln('Pocet sudych prvku je: ',s);
       readln;
end.

#1 ondrašek
V podstatě bys mohl obkreslit ty čáry, které máš ve svém IDE vlevo od zdrojáku.

Vývojáky jsem nikdy nekreslil a nemám v úmyslu s tím začínat. V Assembleru nedělám.

Jj, vyvojovy diagram je nesmysl. Pokud delas program s tak slozitym vetvenim, ze k tomu potrebujes diagram, pak je neco spatne a treba vymyslet jednodussi formu. Jinak bych tam nechtel hledat chybu :)

Google?
http://skola.dvp.sk/…10/06/vd.jpg
http://www.ivt.mzf.cz/…0/euklid.gif

IF prikaz je kosoctverecek, THEN  je +, ELSE -
Bezny prikaz je obdelnik (treba b:=b-a;).
Kosodelnik je cteni, zapis, prace s vnejsim zdrojem (WRITE, READ, writeln,...).
Cyklus (FOR, WHILE), to by asi mel byt taky kosoctverec jako IFko. Jen jedna z podminek bude mit sipku zped do cyklu.

A v podstate prepisujes prikaz po prikazu do ramecku. Cili to nema smysl, to uz samo o sobe je ten programovy kod.Smysl to muze mit az techdy, kdyz si program rozdelis na urcite bloky a udelas diagram mezi temito bloky. A kdyz rozpytvavat detail bloku nema smysl.
V podstate naznak toho je na tom obrazku euklid.gif, kdy cteni A, B ma spojene v jednom ramecku, ktere bys normalne delal dvema samostatnymi prikazy.

Diky za radu no ja ten vývojovy diagram potřebujunjenom protože ho chce učitel :/

Zasláno z mobilního telefonu.

#4 Ondrášek
To je nám jasné. Ovšem od doby, kdy se začalo programovat strukturovaně, postrádají vývojové diagramy smysl. Proto se všichni podivujeme, že to ještě nějaký učitel vyžaduje. Jak už jsem psal, vývojáky mají svůj význam při programování v Assembleru.