👤
a fost răspuns

Creaza un program la informatica la pascal .
Se considera 4 numere intregi .sa se scie un program care determina numarul mai mic .
Va rog mult .

Răspuns :

Program P2;

var x,y,z,w : integer;

begin

write('x='); readln(x);

write('y='); readln(y);

write('z='); readln(z);

write('w='); readln(w);

if (x<y) then if (x<z) then if (x<w) then writeln ('Cel mai mic numar=',x);

if(y<x) then if(y<z) then if (y<w) then writeln ('Cel mai mic numar=',y);

if (z<x) then if(z<y) then if (z<w) then writeln ('Cel mai mic numar=',z);

if (w<x) then if (w<y) then if (w<z) then writeln ('Cel mai mic numar=',w);

readln;

end.


Posibil ca mai sunt variante de rezolvare cu alte instructiuni. Varianta mea este acesta



Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că informațiile disponibile v-au fost utile. Dacă aveți întrebări suplimentare sau aveți nevoie de sprijin, nu ezitați să ne contactați. Vă așteptăm cu drag și data viitoare! Nu uitați să adăugați site-ul nostru la favorite pentru acces rapid.


Wix Learning: Alte intrebari