[讨论]几道PASCAL题，你会做吗？

主题：[讨论]几道PASCAL题，你会做吗？

zhoufenghua [专家分：30] 发布于 2008-11-10 08:22:00

1计算1901年2099年之间的某月某日是星期几
2输出如下图形
          *       *       *
         ***     ***     ***
        *****   *****   *****
       ******* ******* *******
     **************************
3输入一个正整数N，将N分解成质因数幂的乘积形式。例如：36=22*32

最后更新于：2008-11-17 14:00:00

本帖地址： http://bbs.pfan.cn/post/288941.html

回复列表（共3个回复）

沙发

DYF213 [专家分：90] 发布于 2008-11-13 19:44:00

用字符串
  var
    a,b:string;
  begin
    readln(a);readln(b) ;
    writeln(a+b);
  end.

板凳

wangzhongqi96 [专家分：40] 发布于 2008-11-13 22:30:00

第一题用枚举
第二题：
VAR
          A,B:STRING;
        C,D:INTEGER;
BEGIN
   READLN(A);
   READLN(B);
   D:=LENGTH(B)
   CASE B OF
     1:K:=10;
     2:K:=100;
     3:K:=1000;
   END;
  C:=VAL(A)*K+VAL(B);
  WRITELN(C);
END.
   给我加50分

3 楼

zhoufenghua [专家分：30] 发布于 2008-11-19 16:16:00

怎么第三题没人会做啊

我来回复

您尚未登录，请登录后再回复。点此登录或注册

主题：[讨论]几道PASCAL题，你会做吗？

回复列表（共3个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：[讨论]几道PASCAL题，你会做吗？

回复列表 （共3个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共3个回复）