de pascal a delphi
 

tengo estos dos procedures:

const n=4; (*numero de bancos*)
M=50000; (*dinero k invierto*)
type matriz=array [1..n],[0,M]

procedure intereses(var f:matriz; var I:matriz):cardinal;
var i,j:cardinal;
begin
for i:=1 to n do i[i,0]:=0 end;
for j:=1 to M do I [i,j]:=F[1,j] end;
for i:=2 to n do
for j:=1 to M do
I[i,j]:= max(I,F,i,j)
end
end;
return I[n,M]

end intereses;

----------------------------------------------------------------------------------------


procedure Max(var I, F:matriz, j:cardinal):cardinal;
var max, t:cardinal;
begin
max:=I[i-1,j-t]+F[i,t])
foir t:=1 to j do
max:=max2(max,I[i-1,j-t]+F[i,t])
end;
return max
end Max;


pero no se como traducirlos a delphi, algunas ideas?
saludos

¿En qué pascal se supone que compila esto?

// Saludos

de C a delphi
 

perdon creo k es C

es k no me di cuenta

saludos

de C a delphi
 

kreo k estos procedures son en C
pero la idea es llevarlos a delphi
disculpas a todos es k
no se muy bien de esto

a mi me parece que no es codigo en C, es codigo en delphi.

A mi me parece un Hibrido, pero he visto en otros mensajes de este chico, que no tiene ganas, ni de leer ni de investigar.:cool:
Es vastante facil traducir eso. pero bueee..
la facultad yo ya la hice

Enan0
 

ok. este seria mi ultimo mensaje en este foro