Pagini recente » Cod sursa (job #114329) | Cod sursa (job #254987) | Cod sursa (job #1292428) | Cod sursa (job #1277950) | Cod sursa (job #251656)
Cod sursa(job #251656)
program semne1;
uses crt;
var f:text;
i,n,x,p:integer;
s,s1:int64;
a:array[1..50000] of longint;
c:array[1..50000] of char;
begin
assign(f,'semne.in');
reset(f);
readln(f,n,s);
for i:=1 to n do read(f,a[i]);
close(f);
assign(f,'semne.out');
rewrite(f);
p:=random(100);
for i:=1 to p do random(20);
repeat
s1:=0;
for i:=1 to n do
begin
x:=random(2);
if x=0 then begin
s1:=s1-a[i];
c[i]:='-'
end
else begin
s1:=s1+a[i];
c[i]:='+'
end
end;
until s=s1;
for i:=1 to n do
write(f,c[i]);
close(f);
end.