| Autor |
Mensaje |
nico111
Nivel 3
Registrado: 23 Ago 2011
Mensajes: 23
Carrera: Industrial
|
|
hola, para practicar para el segundo parcial estube boludeando un rato con el pascal creando matrices y funciones...
| Código:
|
program ejercicio;
uses crt;
type
matriz=array[1..2,1..3,1..3]of integer;
var
mat:matriz;
a,b,c,d:integer;
begin
clrscr;
for a:=1 to 2 do
begin
for b:=1 to 3 do
begin
for c:=1 to 3 do
begin
mat[a,b,c]:=0
end;
end;
end; (* pongo toda la matriz en 0 *)
clrscr;
for a:=1 to 2 do
begin
writeln();
writeln('sucursal: ',a);
for b:=1 to 3 do
begin
writeln();
writeln('vendedor: ',b);
for c:=1 to 3 do
begin
writeln('articulos ',c,' vendidos: ',mat[a,b,c])
end
end
end; (* pido q me escriba la matriz *)
readln();
end.
|
es un simple programa q pone una matriz (1..2,1..3,1..3) todo en 0
despues le pido que me la escriba y me la escribe todo mal
ba todo mal no.
me escribe lo ultimo bien (lo que veo sin subir), subo para ver el resto y aparece todo desordenado y mal.
|
|
|
|
|
|
| |
    |
|
nico111
Nivel 3
Registrado: 23 Ago 2011
Mensajes: 23
Carrera: Industrial
|
|
| lo mire 20 veces y no tiene nada mal, puede ser el pascal q se esta volviendo loco? capas mi antivirus lo jode un poco.
|
|
|
|
|
|
| |
|
|
Fabricio
Nivel 8
Edad: 36
Registrado: 20 Nov 2008
Mensajes: 851
Ubicación: Villa del Parque, barrio turro
Carrera: Civil
|
|
no entendi bien la duda, como queres que te muestre todo??
cuando lo compilo me lo muestra asi:
|
|
|
|
_________________
![[tex]100 \% \ \ {ingeniero}[/tex]](images/latex/48cd3513e832f53547d671e0162ba3adbacdea7a_0.png "[tex]100 \% \ \ {ingeniero}[/tex]")
|
|
   |
|
|
|
|
|
Ver tema siguiente
Ver tema anterior
Podés publicar nuevos temas en este foro
No podés responder a temas en este foro
No podés editar tus mensajes en este foro
No podés borrar tus mensajes en este foro
No podés votar en encuestas en este foro
No Podéspostear archivos en este foro
No Podés bajar archivos de este foro
|
Todas las horas son ART, ARST (GMT - 3, GMT - 2 Horas)
Protected by CBACK CrackerTracker365 Attacks blocked.
|
|
|
[ Tiempo: 0.2478s ][ Pedidos: 20 (0.1985s) ] |
