Prikazi cijelu temu 04.12.2014 14:15
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Dali je broj pozitivan negativan ili nula
Ovaj kod vam odredjuje dali je uneseni broj pozitivan, negativan ili nula.
PreuzmiIzvorni kôd (Delphi):
  1. PROGRAM PROGRAM1;
  2. USES
  3.   WinCrt;
  4. VAR
  5.   a : Real;
  6. BEGIN
  7.   Write('Vas broj ');
  8.   Readln(a);
  9.   IF a > 0 THEN
  10.     Writeln('BROJ JE POZITIVAN')
  11.   ELSE
  12.     IF a < 0 THEN
  13.       Writeln('BROJ JE NEGATIVAN')
  14.     ELSE
  15.       Writeln('BROJ JE NULA');
  16.   END.

Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.