pascal输入一个整数,输出每个数字对应的拼音.当整数为负数时,先输出“fu”字 .比如输入1234 输出yi er san si 速求!

来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/17 08:28:14
pascal输入一个整数,输出每个数字对应的拼音.当整数为负数时,先输出“fu”字.比如输入1234输出yiersansi速求!pascal输入一个整数,输出每个数字对应的拼音.当整数为负数时,先输出

pascal输入一个整数,输出每个数字对应的拼音.当整数为负数时,先输出“fu”字 .比如输入1234 输出yi er san si 速求!
pascal输入一个整数,输出每个数字对应的拼音.当整数为负数时,先输出“fu”字 .比如输入1234 输出yi er san si 速求!

pascal输入一个整数,输出每个数字对应的拼音.当整数为负数时,先输出“fu”字 .比如输入1234 输出yi er san si 速求!
var
    x,t,r:longint;
begin
    readln(x);
    t:=1;
    while(t<x) do t:=10*t;
    t:=t div 10;
    if(x<0)then
    begin
        write('fu ');
        x:=-x;
    end;
    while(x>0) do
    begin
        r:=x div t;
        case r of
        0:write('ling ');
        1:write('yi ');
        2:write('er ');
        3:write('san ');
        4:write('si ');
        5:write('wu ');
        6:write('liu ');
        7:write('qi ');
        8:write('ba ');
        9:write('jiu ');
        end;
        x:=x mod t;
        t:=t div 10;
    end;
        readln();
end.

pascal输入一个整数,输出每个数字对应的拼音.当整数为负数时,先输出“fu”字 .比如输入1234 输出yi er san si 速求! 【急!】Pascal.输入一个整数,输出该数每一位数字的和.第一题:输入一个整数a(0 pascal输入一个整数,如果它是7的倍数,则输出‘yes’,否则输出‘no’. pascal程序设计 输入一个整数n,n 输入一个整数,将各位数字反转后输出 输入一个整数,将各位数字反转后输出. c++ pascal算一个数各个位数的平方和编写程序实现功能,对于输入的整数,求该整数的各位数字的平方和.输入部分:多组数据,每组数据有一个输入行,输入一个整数(0~999999间的整数)输出部分: Pascal求任意一个三位数数个位数字之和 输入:123; 输出:1+2+3=123 Free Pascal问题 任意输入一个四位数,输出的结果是其各个数位上的数字之和 pascal输入一个n位的正整数,输出由这n个数字组成的最大正整数. pascal 二维数组编程输出如下所示的“ 蛇形数字三角形”.要求:①输入一个自然数n(n 输入一个整数n,求它各位上的数字和 pascal同题··n pascal统计数字对统计数字对 Description 编制一个程序.要求输入一个长度为10的数字串(0~9),然后统计出在这组数中每相邻两数字组成的数字对出现的次数.输入:一个字符串输出:每组数字对出 pascal平方数平方数 将1~9这九个数字组成三个三位的平方数,要求每个数字只准使用一次.输出:从小到大输出这三个平方数,每行一个.样例输入 无 样例输出 Sample Output 无 时间限制 Time Limitation 输入一个正整数A,如果A的各个数字之和为7的倍数则输出‘YES’,否则输出‘NO’ Turbo pascalTurbo pascal的程序求解,如题. 输入一个正整数N(注意:根据输入的N的值,来判断N的位数),用while语句输出它的各位数字.pascal 语言 电脑程序设计:PASCAL语言1.输入一个四位整数,把它的各位数字倒序输出.(提示:用MOD和DIV运算完成)2.从键盘上读入一个实数,利用ROUND()和TRUNC()函数,输出该实数本身.整数部分.小数部分.四舍五入 数字三角形pascal 【试题描述】 输入正数N,输出下列形状的三角形.例如:当N=5时输出:11 7 12 4 8 13 2 5 9 14 1 3 6 10 15 【输入描述】 一个整数N( N