• 2017年9月2日普级组T1 正方形


    Description

    又到暑假啦,Conan, Ayumi, Mitsuhiko, Genta一起到Hakase家愉快玩耍(然而你却不行……)。
    Ayumi, Mitsuhiko, Genta依次开始画正方形(显然Ai是不会参加这个活动的),一人一笔,画完一个,以上一个正方形四边中点为顶点接着画啊画啊画啊……最后一共画了k个正方形。最终他们想知道自己各画了多长。

    Input

    输入一行包含两个整数N,K,分别表示第一个正方形的边长,正方形个数。

    Output

    输出一行,三个实数,分别表示Ayumi, Mitsuhiko, Genta画的长度,答案保留3位小数。

    Sample Input

    100 2

    Sample Output

    270.711 241.421 170.711

    Hint

    【数据规模与约定】
    对于100%的数据满足N<=1000,K<=1000。

    【样例解释】
    画边的顺序如下:
    这里写图片描述

    画边的编号如下:
    1、4、7的画边编号是1号
    2、5、8的画边编号是2号
    3、6的画边编号是3号

    分析
    找规律,每个正方形总会有一个人多画一条边,而下一个正方形多画的那个人则是上一个多画的人的编号+1。
    n:=sqrt((n/2) * (n/2)+ n/2) * (n/2));
    n表示下一条要画的边的长度

    程序:

    var
    k,i,j,tj:longint;
    a,b,c,n:real;
    begin
        assign(input,'square.in');
        reset(input);
        assign(output,'square.out');
        rewrite(output);
        read(n,k);
        a:=0;b:=0;c:=0;
        j:=1;
        for i:=1 to k do
        begin
            a:=a+n;b:=b+n;c:=c+n;
            if j=1 then a:=a+n;
            if j=2 then b:=b+n;
            if j=3 then c:=c+n;
            inc(j);
            if j=4 then j:=1;
            n:=sqrt((n/2)*(n/2)+(n/2)*(n/2));
        end;
        write(a:0:3,' ',b:0:3,' ',c:0:3);
        close(input);
        close(output);
    end.
    
    
  • 相关阅读:
    在CentOS7上搭建本地yum仓库
    CentOS 7 64位虚拟机安装过程
    汇编:1位16进制数到ASCII码转换
    汇编:3个数排序(从大到小)
    汇编:滤去(删除)某个字符串中空格符号
    汇编:计算字符串长度
    汇编:字符串小写变大写(子程序)
    汇编:输出寄存器AX中的内容(子程序)
    汇编:输出寄存器AX中的内容
    使用汇编语言将输入的字符串大写转换为小写
  • 原文地址:https://www.cnblogs.com/YYC-0304/p/9500051.html
Copyright © 2020-2023  润新知