Vývojový diagram – C / C++ – 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.

nevím jestli to patří zde ale lepší místo na umístění jsem nenašel :/

#2 ondrašek
nepatří, pokud se nemýlím je to delphi, takže tady

#3 BDS
Podle čeho to rozeznáš od Pascalu?

#4 Kit
To má být v pascalu ten program ale nenašel jsem tu pascal tak jsem to tam nemohl dát

#5 ondrašek
Pascal je tady také: http://programujte.com/forum/diskuze/25-pascal/, ale už to neřeš. Delphi je jeho implementací.

#6 Kit
Aha tak to sem opravdu neviděl :)

#4 Kit

1. musíš pozorněji číst "pokud se nemýlím je to delphi"
2. udělal jsem chybu (když jsem si nebyl jistý), měl jsem dát odkaz na přehled diskuzí
3. tazatel mohl napsat "ne není to delphi, je to.."

omlouvám se