一个简单的控制台程序

program Project1;
{$APPTYPE CONSOLE}
uses
  SysUtils;
var
str:String;
begin
   Writeln('请输入：');
   Readln(str);
   Writeln('您输入的内容是：'+str);
   readkey;
end.
{
-----------------------------
Writeln是输出语句，输出语句有三种格式:
       ① Write (输出项1，输出项2) ；   ｛执行输出后光标不换行｝
       ② Writeln (输出项1，输出项2) ； ｛执行输出后光标换到下一行｝
       ③ Writeln                       ｛仅输出空白且光标换到下一行｝
Writeln语句后面的圆括号以内部分均为输出项，可以是多项，各项间用逗号分隔；
对单引号里的内容按照引号内的原样(字符)输出显示。
如果输出项是表达式，则只输出表达式的值，而不是表达式本身。
Readln是输入语句，它的一般格式为:
              ① Read     (变量1，变量2)；
              ② Readln   (变量1，变量2)；
              ③ Readln
前两种格式均要从键盘给变量输入数据，
输入时，所键入的数据之间以空格为分隔，以回车为输入结束。
若多输入了数据(即数据个数超过变量个数)，Read语句读完数据之后，
能让后续的读语句接着读取多下来的数据；而Readln 语句对本行多输入的数据不能让
后续语句接着读取多下来的数据。为了防止多输入的数据影响下一个输入语句读取数据，
建议尽量使用Readln语句输入数据。第三种格式不需输入数据，只需按入一个回车键。
}

转载于:https://www.cnblogs.com/zyc653/archive/2012/04/11/2442891.html