#include<cstdio>
int n,m,a;
int main(){
scanf("%d%d",&n,&m);
for (int i=1; i<=m; i++){ a+=n/2; n-=n/2; }
printf("%d",a);
}

claris，你的程序在输入（8，1）时是错误答案~
贴程序：
var
i:longint;
k,m,n:int64;
begin
readln(m,n);
k:=m;
for i:=1 to n do
dec(m,m shr 1);
writeln(k-m);
end.

var
m,n : longint;
begin
read(m,n);
writeln(m - (m >> n) - 1);
end.

史上最短程序

var

m,n,a,i:longint;

begin

read(m,n);a:=m;

for i:=1 to n do m:=m div 2;

write(a-m-1);

end.

├ 测试数据 01：答案正确... (15ms, 672KB)

├ 测试数据 02：答案正确... (14ms, 672KB)

├ 测试数据 03：答案正确... (0ms, 672KB)

├ 测试数据 04：答案正确... (15ms, 672KB)

├ 测试数据 05：答案正确... (15ms, 672KB)

---|---|---|---|---|---|---|---|-

农夫山泉有点甜

真是越学越弱智了，自己写的时候竟然忘了当m为奇数时m div 2再加1

哈哈哈哈哈！

好简单啊！

program P1785;

var

n,m,k,i:longint;

begin

read(m,n);

for i:=1 to n do

begin

k:=k+m div 2;

m:=m-(m div 2);

end;

writeln(k);

end.

---|---|---|---|---|---|---|---|---|-AC45题纪念！---|---|---|---|---|---|---|---|--

此题由于是本人第一次提交，所以很简单，测试数据也较弱，但一定要审清题哦！