shu_zu.pas

本人 菜鸟+学生 ！ 老鸟指教的说 这些是自己写的一写PAS的程序

program shu_zu;
     var i:integer;
         a:array[1..10]of integer;
 begin
  for i:=1to 10 do
    readln(a[i]);
  for i:=1 to 10 do
    write(a[i],' ');
  readln
 end.