👤
Mangircatalina1
a fost răspuns

DAU COROANAAAAAAAAAAAAA!!!!!!!!!!!!!!!!!
De la tastatura se introduce un numar natural de 2 cifre. Scrieti un program PASCAL care va calculata si va afisa pe ecran oglinditul numarului dat.

Răspuns :

Damarisiftene
program oglindit_numar;
var numar, oglindit : integer;
begin
    
    write("Introdu numarul de 2 cifre:");
    readln(numar);
  
    if (numar > 99) or (numar < 10) then
        begin
        writeln("Numarul introdus nu are 2 cifre.");
        exit;
        end;
    
    oglindit := (numar mod 10) * 10 + (numar div 10);
    writeln("Oglinditul numarului ", numar, " este ", oglindit);
    readln;

end.

Alte intrebari