Komentar

Jumat, 05 Juli 2013

IF THEN ELSE

Posted by M Habibie 19.59, under | No comments





var
 N: longint;





begin
 readln(n);
 if n > 0 then
  begin
   writeln('positif');
  end
 else
  
 if n = 0 then
  begin
   writeln('nol');
  end
 else
  
 if n < 0 then
  begin
   writeln('negatif');
  end;
end.

0 komentar:

Posting Komentar

Your Ip Address

Your IP Address

IP

Popular Post

Popular Posts