Prikazi cijelu temu 04.12.2014 17:00
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Max od 3 broja
Od tri unesena broja naci najveci
PreuzmiIzvorni kôd (Delphi):
  1. ROGRAM Program7;
  2. USES
  3.   WinCrt;
  4. VAR
  5.   a, b, c, max: Real;
  6. BEGIN
  7.   Write('Vasa tri broja ');
  8.   Readln(a, b, c);
  9.   max := a;
  10.   IF b>max THEN
  11.     max := b;
  12.   IF c>max THEN
  13.     max := c;
  14.   Writeln('Od brojeva ', a, ' ', b, ' ', c);
  15.   Writeln('najveci je ', max);
  16. END.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.