Predmet:Dali je broj veci ili manj od nule ili nula
Ova procedura provjerava jeli broj veci ili manji od nule ili je pak nula.
PreuzmiIzvorni kôd (Delphi):PROGRAM Program2;
VAR
a : Real;
BEGIN
Write('Unesi broj ');
Readln(a);
if a>0 then
Writeln('Veci od nule');
if a<0 then
Writeln('Manji od nule');
if a=0 then
Writeln('Nula');
Readln;
END.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.