Question

我是java程序员，但现在我开始学习更多关于pascal编程你能帮忙吗？如何在pascal中编写这个java语法

        A[m] = scan.nextInt();

程序是要求用户输入“大小”然后输入元素...（使用数组）我这样做了：

writeln('How many Number you would like to sort:');
  readln(size);


  For m := 1 to size do
Begin
   if m=1 then 
 begin 
 writeln('');
 writeln('Input the first value: ');
     (????)



 End;

我不知道如何完成它？

java语法是：

for( m = 0; m<size; m++)
{
    if(m == 0)
    {   
        System.out.println("");
        System.out.print("^_^ Input The First Value:");
        A[m] = scan.nextInt();
    }
    else if(m == size -1)
    {
        System.out.print("^_^ Input The Last Value:");
        A[m] = scan.nextInt();
    }
    else
    {
        System.out.print("^_^ Input The Next Value:");
        A[m]= scan.nextInt();
    }
}

谢谢

Answer 1

尝试： readln（A [米]）;

Answer 2

read(a[m]);

应该完美无缺。

Answer 3

在这里打字，但希望这个概念出现：

{ in declarations }
var A: array[1..99] of integer;   { or however many you need; data workspace }
    m: integer;   { loop index }
    size: integer;


{ in code }
fillchar(A,sizeof(A),#0);  { just good practice to clear out the workspace before starting}
writeln('How many Number you would like to sort:');
readln(size);

For m := 1 to size do
  begin
    if (m=1) then 
      writeln('Input the first value: ')
    else
      if (m=size) then
        writeln('Input the last value: ')
      else
        writeln('Input the next value: ');
    readln(a[m]);
  end;

请注意，我使用的是1索引数组而不是零索引数组。没有其他理由我喜欢这样，在整个地方使用“-1”保存。

Answer 4

这是尝试使用数组接收数据。数组ps的大小受变量的限制。

var / type
A = array [1..13] : integer;
m : integer;

repeat
    readln (A[m]);
    m:=m+1;
until (m<=10);

我想......

pascal中的数组语法

4 个答案: