👤
SimpluOm
a fost răspuns

Sarcina 9, o rezolvati in caiet, faceti screen si trimiteti aici va rog. Multumesc.

Sarcina 9 O Rezolvati In Caiet Faceti Screen Si Trimiteti Aici Va Rog Multumesc class=

Răspuns :

Howardax

program Hello;

var valoare:integer;

begin

 writeln ('Dati valoarea:');

 readln(valoare);

 case valoare of

1: writeln('un ban');

5: writeln('cinci bani');

10: writeln('zece bani');

25: writeln('douazeci si cinci de bani');

50: writeln('cincizeci de bani!');

else writeln('valoare inadmisibila');

end

end.

Alte intrebari