11.1.pas

来自「delphi renyuanguanlixinxioxitong」· PAS 代码 · 共 9 行

program Project1;
{$APPTYPE CONSOLE}//uses SysUtils;
var
str:string; 
begin
//Insert user code here writeln('您好,这是一个示范程序，请输入一行文字: '); readln(str);writeln('您输入的是: ',str); 
readln;
end.