Tuesday, April 24, 2007

SUSI...RISOLUZIONE

ecco la risoluzione informatizzata del quesito della susi, questa ci è stata fornita dal prof in pascal..innanzitutto assegnamo i valori:
a=anni=?
r=20 (c1)
s=9 (c2)
t=6 (c3)

a=(c1*x)+(c2*y)+(c3*z)
x,y,z=combinazioni delle scatole
ecco il programmino:
program susi_854;
uses crt;
const r=20; s=9; t=6;
var a,x,y,z:integer;
e:boolean;
begin
clrscr;
a:=1001;
repeat dec(a);
e:=false;
for x:=0 to a div s do
for y:=0 to a div s do
for z:=0 to a div t do
if x*r+y*s+z*t=a then e:=true;
until not(e);
writeln(a);
end.
IL NOSTRO COMPITO ORA è QUELLO DI TRADURLO IN PHP!

No comments: