program uslovIF;
//U program se unose dva broja x i y i program ispisuje koji je od njih veci
uses crt;
var
x,y:integer;
begin
clrscr;
writeln('Unesite broj x');
write('x=');
read(x);
writeln('Unesi broj y');
write('y=');
read(y);
if (x>y) then
begin
writeln('x je veci');
end
else
begin
writeln('y je veci');
end;
readln;
readln;
end.
//U program se unose dva broja x i y i program ispisuje koji je od njih veci
uses crt;
var
x,y:integer;
begin
clrscr;
writeln('Unesite broj x');
write('x=');
read(x);
writeln('Unesi broj y');
write('y=');
read(y);
if (x>y) then
begin
writeln('x je veci');
end
else
begin
writeln('y je veci');
end;
readln;
readln;
end.
Нема коментара:
Постави коментар