高兴的小明

高兴的小明

难度级别：A； 运行时间限制：1000ms； 运行空间限制：51200KB； 代码长度限制：2000000B

试题描述

今天，小明很高兴，因为国庆放假了，又恰逢是自己的生日。为了庆祝节日，小明与邻居的小伙伴共n个人相约一起放花炮。他们先同时放响了第一个花炮，随后n个人分别以A1、A2、A3、……An秒的间隔继续放花炮，到最后每人都放了b个花炮（包括第一个）。问：总共可听到多少声花炮响？

输入

共三行，第一行仅一个整数n(n<=10)，第二行是A1、A2、A3、……An共n个整数(每个数<=100,各数间以空格相隔)，第三行只有一个整数b(b<=100)。

输出

仅一行，一个整数（听到的花炮响声数）。

输入示例

3  1 2 3 4

输出示例

7

其他说明

绍兴市第七届少儿信息学竞赛复赛试题（二）

 提交网址： http://marcool.net/home/problem.htm?problemID=5

 

 

var a: array[ 0.. 10000] of longint;
    b: array[ 1.. 100] of longint;
    i,j,x,n,m:longint;
begin
    readln(n);
     for i:=  1  to n  do read(b[i]);
    readln(m);
     for i:=  1  to n  do
         for j:=  0  to m- 1  do
            a[j*b[i]]:= 1;
    ans:= 0;
     for i:=  0  to  10000  do
         if a[i]= 1  then inc(x);
    writeln(x);
end.

 

 

转载于:https://www.cnblogs.com/qilinart/articles/2993374.html