molio bih one koji poznaju pascal i c++,da mi prevedu ovaj kod....
program nizovi_zad;
uses crt;
var niz,s:string;
br:array [1..100] of integer;
brojac,x,y,g,broj:integer;
nul:boolean;
begin
clrscr;
readln(niz);
nul:=false;
brojac:=0;
repeat
inc(brojac);
s:=copy(niz,1,pos(' ',niz)-1);
val(s,br[brojac],g);
if br[brojac]=0 then nul:=true;
delete(niz,1,pos(' ',niz));
until pos(' ',niz)=0;
val(niz,br[brojac+1],g);
if br[brojac+1]=0 then nul:=true;
for x:=1 to brojac+1 do
begin
broj:=br[x];
for y:=1 to brojac+1 do
begin
if ((broj=br[y]) and (x<>y)) then br[y]:=0;
end;
end;
if nul=true then write('0 ');
for x:=1 to brojac+1 do
begin
if br[x]<>0 then write(br[x],' ');
end;
readln;
end.