Мәліметтерді шығару форматы
Шығыс файлға пробелмен бөлінген екі бүтін сан жазылу керек-ең үлкен мүмкін болған компьютердің саны және олардың барынша ең көп мүмкін болған жиынтық бағасы.
Мысал
C.in
|
C.out
|
3 2
1 2 3
4 5
|
2 23
|
uses crt;
type mas=array[1..1000]of longint;
var
i,j,k,l,m,n,min:longint;
sum:longint;
a,b:mas;
procedure sort(var a:mas;n:longint);
begin
for i:=1 to n-1 do
for j:=i+1 to n do
if(a[i]l:=a[i];
a[i]:=a[j];
a[j]:=l;
end;
end;
begin
assign(input,'c.in');reset(input);
assign(output,'c.out');rewrite(output);
readln(n,m);
for i:=1 to n do read(a[i]);
for j:=1 to m do read(b[j]);
sort(a,n);sort(b,m);
if(n>m)then min:=m else
min:=n;
for i:=1 to min do
sum:=sum+(a[i]*b[i]);
write(min,' ',sum);
close(input);close(output);
end.
D есебі. Жалқаулық.
Енгізу файлының аты: D.in
Шығару файылының аты: D. Out
Есептің жауабы файылының аты: D. pas
Уақыт шектеу: 2 секунд
Жадыға шектеу: 64 мегабайт
Оқытушы емтиханға дайындалуға үшін оқушыларына N сұрақтарды берді. Осы сұрақтардан ол емтиханға үшін А сұрақты таңдайды, ал оқушы, бесті алу үшін В сұрақты (бұларды А сұрақтан) жауап беру тиісті. Ку оқушы барлық сұрақтарды оқытуға қаламайды. Бесті алу үшін, сұрақтардың қандай ең аз саны оған жатап алу керек?
Достарыңызбен бөлісу: |
