From 80c9367ba51b687e274d28e5c56130bfcfcc735e Mon Sep 17 00:00:00 2001 From: Kirito <1362050620@qq.com> Date: Sun, 1 May 2016 10:50:15 -0500 Subject: [PATCH] Create 1248.pas --- VIJOS/1248.pas | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100644 VIJOS/1248.pas diff --git a/VIJOS/1248.pas b/VIJOS/1248.pas new file mode 100644 index 0000000..c83fd9f --- /dev/null +++ b/VIJOS/1248.pas @@ -0,0 +1,17 @@ +var m,s:double; +k,x1,x2,x3,x4,i1,i2,i3,i4,v:longint; +begin +read(k,x1,x2,x3,x4); +m:=maxlongint; +for i1:=0 to 10 do +for i2:=0 to 10 do +for i3:=0 to 10 do +for i4:=0 to 10 do +if (i1+i2+i3+i4<=k) then +begin +v:=(10+i4)x4; +s:=(20-i12)x1+(100-i27)x22/v+(100-i39)x3/v; +if (s0) then m:=s; +end; +write(m:0:3); +end.