Question

Scrieți un program Pascal, care citește de la tastatură un număr și afișează pe ecran dacă este pozitiv (mai mare decât 0), nul (egal cu 0) sau negativ (mai mic decât 0). Se recomandă de utilizat „if.. else”, eventual de două ori.

dau coroana

Answer 1

Răspuns:

program T;

var a,b,c:integer;

begin

read(a);

if(a>0) then write(' este pozitiv')

else if (a<0) then write(' este negativ')

else write(' este nul');

end.