program try;
var a,b:integer;
    ch:char;
begin
     readln(a,ch,b);
     writeln(a,ch,b);
end.
这个程序如何输入???a,ch,b是不同类型的数,输入一直不正常。解释一下哈。才开始学pascal。见笑了。

解决方案 »

  1.   

    program try11;//这里不要用try,因为与DELHPI的关键字重名了
    {$APPTYPE CONSOLE}//表示这是一个控制台程序
    var a,b:integer;
        ch:char;
    begin
         readln(a,ch,b);
         writeln('a=',a,' ch='+ch,' b=',b);//这样的输出结果可能明显一些
         readln;//加这一行可以实现一个延时,以便看到程序的结果
    end.创建程序的方法:
    打开DELHPI
    FILE->new->other ->'console application'
    这样就可以新建一个控制台程序了
      

  2.   

    到底是delphi还是pascal???
    难道就不能
    write('a=');readln(a);
    write('b=');readln(b);
    write('ch=');readln(ch);
      

  3.   

    好像是Pascal的问题;
    呵呵
    ------------------------------------------------
    招聘斑主我们可以一起交流;
    呵呵
    www.nxrs.net/bbs
    谢谢,别抛砖
      

  4.   

    write('a=');readln(a);
    write('b=');readln(b);
    write('ch=');readln(ch);
    小心吧空格也当成字符处理
      

  5.   

    输入是这么回事:在CHAR输入后不能空格或有其它字符,直接输入后面的INTEGER就行了。
        这个问题我遇到过,就是因为CHAR是单个字符类型,所以不管是什么空格也好,数字也好,字母也好。只要有击键值它就认为是个字符。
      

  6.   

    假如你要a=12 b=13 c=14那么输入12 13 14就行了.
      

  7.   

    输入a值后回车,
    输入ch后回车,
    输入b后回车。
      

  8.   

    经过实验,只有yayx的方法解决了问题。
    其他的运行时都出错
      

  9.   

    program try;
    var a,b:integer;
        ch:char;
    begin
         write('a=');readln(a);
         write('ch=');readln(ch);
         write('b=');readln(b);
         writeln('a=',a,' ch='+ch,' b=',b);
         readln;
    end.
    分开输入吧,因为原来的方法你可能这样输入了11 A 22
    注意空格也是一个字符
    所以Pascal把11赋给了a,' '<空格>赋给了ch,而后面的A 22怎么办呢,当然因此就出现错误了。
    还是一个萝卜一个坑的好,至少不太会错。
      

  10.   

    楼上的!
    人家是问你怎么输!
    小弟,我教你!
    这是让你输入三个数,然后输出。
    你打一个数后按一个空格就OK了
    例:
    input 1 2 3
    output 1 2 3