Menü

Oszd meg!

Add a Twitter-hez Add a Facebook-hoz Add a Startlaphoz Add az iWiW-hez Add a Google Reader-hez

PDF-ből szöveg

PDF-ből szöveg konvertáló

Közösség

Belépés

E-mail cím:
Jelszó:

Mostani DOGA

4. feladat: A nev1,nev2,nev3 egy egy nevet tartalmaz. a neveket hosszuk szerint rendezzük sorendbe, növekvö sorendbe.

 

program xyz;

var nev1,nev2,nev3,s,z,k:string;

begin

readln(nev1);

readln(nev2);

readln(nev3);

IF (length(nev1)>length(nev2)) then

begin

s:=nev1;

nev1:=nev2;

nev2:=s;

End

Else

IF (length(nev1)>length(nev3)) then

Begin

z:=nev1;

nev1:=nev3;

nev3:=z;

end

Else

IF (length(nev2)>length(nev3)) then

begin

k:=nev2;

nev3:=nev2;

nev2:=s;

 

end;

writeln(nev1,nev2,nev3);

readln;

end.