Pregunta abierta: diagrama de flujo pascal??

robotRSS

hola tengo dudas, de cual seri el diagram de flujo de este codigo, es que no se como representar 2 for, 2 if, espero me ayuden, g4_gtaqhotmail.comprogram recuerdo;usescrt;vari,n,auxa,auxb:integer;veca: array [1..100] of integer;vecb: array [1..100] of integer;beginclrscr;writeln ('dame n');readln(n);for i:=1 to n dobeginwriteln('dame el numero del vector ',i, ' a');readln(veca[i]);writeln('dame el numero del vector ',i, ' b');readln(vecb[i]);end;auxa:=veca[i];auxb:=vecb[i];for i:=1 to n dobeginif veca[i]>auxa thenauxa:=veca[i];if vecb[i]>auxb thenauxb:=vecb[i];end;writeln('este es el mayor de a');writeln(auxa);writeln('este es el mayor de b');writeln(auxb);readln;end.