Question

Se considera 2 variabile s1 si s2 care memoreaza fiecare cate un sir de maximum 50 de caractere. Scrieti secventa de instructiuni care afiseaza cele doua siruri de caractere in ordinea crescatoare a lungimii lor. Pascala !

Answer 1

program douaSiruri;

var s1, s2:string[50];

begin

 write('introdu sirul de caractere s1: '); read(s1);

 write('introdu sirul de caractere s2: '); read(s2);

 if length(s1)<length(s2) then writeln(s1, '  ',s2)

 else writeln(s2, '  ',s1);

end.