-
peppone14.
User deleted
ma dove l'hai messo il programma io nn l'ho trovato, cmq se vuoi pubblico il linguaggio da cui l'ho fatto, ma nn mi sembra ke ci siano errori, SPOILER (click to view)Program giochino;
USES PRINTER;
var a,c,d,e,f,g,h,i,l,m,b,z:integer;
begin
b:= random(100);
writeln ('hai 10 possibilit…');
writeln ('scrivi un numero');
readln (a);
if a>b then writeln('scrivi un numero piu grande');
if a<b then writeln('scrivi un numero piu piccolo');
if a=b then writeln (' hai vinto, bravo');
writeln ('scrivi un numero');
readln (c);
if a>c then writeln('scrivi un numero piu grande');
if a<c then writeln('scrivi un numero piu grande');
if a=c then writeln (' hai vinto, bravo');
writeln ('scrivi un numero');
readln (d);
if a>d then writeln('scrivi un numero piu grande');
if a<d then writeln('scrivi un numero piu piccolo');
if a=d then writeln (' hai vinto, bravo');
writeln ('scrivi un numero');
readln (e);
if a>e then writeln('scrivi un numero piu grande');
if a<e then writeln('scrivi un numero piu piccolo');
if a=e then writeln (' hai vinto, bravo ');
writeln ('scrivi un numero');
readln (f);
if a>f then writeln('scrivi un numero piu grande');
if a<f then writeln('scrivi un numero piu piccolo');
if a=f then writeln (' hai vinto, bravo ');
writeln ('scrivi un numero');
readln (e);
if a>e then writeln('scrivi un numero piu grande');
if a<e then writeln('scrivi un numero piu piccolo');
if a=e then writeln (' hai vinto, bravo ');
writeln ('scrivi un numero');
readln (g);
if a>g then writeln('scrivi un numero piu grande');
if a<g then writeln('scrivi un numero piu piccolo');
if a=g then writeln (' hai vinto, bravo ');
writeln ('scrivi un numero');
readln (h);
if a>h then writeln('scrivi un numero piu grande');
if a<h then writeln('scrivi un numero piu piccolo');
if a=h then writeln (' hai vinto, bravo ');
writeln ('scrivi un numero');
readln (i);
if a>i then writeln('scrivi un numero piu grande');
if a<i then writeln('scrivi un numero piu piccolo');
if a=i then writeln (' hai vinto, bravo');
writeln ('scrivi un numero');
readln (l);
if a>l then writeln('scrivi un numero piu grande');
if a<l then writeln('scrivi un numero piu piccolo');
if a=l then writeln (' hai vinto, bravo');
writeln ('scrivi un numero');
readln (m);
if a>m then writeln('scrivi un numero piu grande');
if a<m then writeln('scrivi un numero piu piccolo');
if a=m then writeln (' hai vinto, bravo');
readln;
end.
e cmq se č stupido pascal io nn ci posso fare niente
.