2017年10月08日普及组 世界语

这里写图片描述

分析
水题一道,提交的时候把文件夹的名字打错了,结果没了100分……

程序

const
a:array[1..10]of string=('unu','du','tri','kvar','kvin','ses','sep','ok','nau','dek');
var
x:longint;
begin
    assign(input,'shijie.in');
    reset(input);
    assign(output,'shijie.out');
    rewrite(output);
    read(x);
    if x<=10 then write(a[x]) else
    if x mod 10=0 then write(a[x div 10]+'dek') else
    if x div 10=1 then write('dek'+' '+a[x mod 10]) else
    write(a[x div 10]+'dek'+' '+a[x mod 10]);
    close(input);
    close(output);
end.
posted @   银叶草  阅读(91)  评论(0编辑  收藏  举报
编辑推荐:
· .NET Core GC压缩(compact_phase)底层原理浅谈
· 现代计算机视觉入门之:什么是图片特征编码
· .NET 9 new features-C#13新的锁类型和语义
· Linux系统下SQL Server数据库镜像配置全流程详解
· 现代计算机视觉入门之:什么是视频
阅读排行:
· Sdcb Chats 技术博客:数据库 ID 选型的曲折之路 - 从 Guid 到自增 ID,再到
· .NET Core GC压缩(compact_phase)底层原理浅谈
· Winform-耗时操作导致界面渲染滞后
· Phi小模型开发教程:C#使用本地模型Phi视觉模型分析图像,实现图片分类、搜索等功能
· 语音处理 开源项目 EchoSharp
Live2D
欢迎阅读『2017年10月08日普及组 世界语』
点击右上角即可分享
微信分享提示