题目:
在了解做软件开发可能赚很多的钱之后,农夫约翰也开了一家小的软件公司为客户写程序。约翰的第一个任务对他来说看起来相当简单:输入一个数N,然后输出17*N的值。但是现在,客户又变更了一个条件,输入的N是一个二进制数,输出的值也要是二进制表示的。
问题描述:
现在请帮助约翰完成这个任务。
输入格式:
一个二进制表示的数N。
输出格式:
二进制表示的17N。
输入输出样例:
times17.in 10110111
times17.out 110000100111
数据范围:N的位数不超过1000位。
说明:10110111相当于十进制的183,于是183*17=3111,二进制形式是110000100111 。
var
a,b,c:array[0..100000]of longint;
s,ss:ansistring;
len1,len2,len3,i,t,g:longint;
begin
read(s);
len1:=length(s);
for i:=1 to len1 do val(s[i],a[len1-i+1]);
ss:=s+’0000’;
len2:=len1+4;
for i:=1 to len2 do val(ss[i],b[len2-i+1]);
i:=1;
while (i<=len1) or (i<=len2) or (i<=len3)do
begin
if len3