Pascal 帕斯卡的成本和利润

Pascal 帕斯卡的成本和利润,pascal,Pascal,我刚刚开始学习帕斯卡语言,一个新的关于这个论坛2。原谅我的错误,告诉我如何继续。我想在这个算法的最后用Pascal语言写下正确的输出,有人能帮我吗?我收到这个消息:Sitax错误在37行(最后一行),CPY不是预期的 Program MotorsFabric ; var Production, { Production of types of motors} CPM: array [1..12,1..2] of integer;

我刚刚开始学习帕斯卡语言,一个新的关于这个论坛2。原谅我的错误,告诉我如何继续。我想在这个算法的最后用Pascal语言写下正确的输出,有人能帮我吗?我收到这个消息:Sitax错误在37行(最后一行),CPY不是预期的

Program MotorsFabric ;
var
Production,                             { Production of types of motors}
CPM: array [1..12,1..2] of integer;      { Cost per mounth}
Values: array [1..2,1..2] of integer;     { Cost and Profit of each motor }
CPY: array [1..2] of integer;             { Cost per Year}
I,J,K: integer;                            { Auxs}


Begin
for I := 1 to 12 do
    for J := 1 to 2 do                      { read Production }
            read( Production [I,J]);

for I := 1 to 2 do
    for J := 1 to 2 do                       { read values }
            read (Values [I,J]);

for I := 1 to 12 do
    for J := 1 to 2 do                     { Costs and Profits per mounth}
            begin
            CPM [I,J] := CPM
            [I,J] + Production [I,K] * Values[K,J]
            end;
    for J := 1 to 2 do
            begin
            CPY [J] := 0;                  { Costs an Profits per Year }
            for I := 1 to 12 do
                    CPY[J] := CPY[J] + CPM [I,J]
            end;
    for I := 1 to 12 do 
            begin                               { Writing results }
            for J := 1 to 2 do
                    write (CPM [I,J]:10);
            writeLn
            end;
writeLn ('Cost per Year :' CPY[1], ' Profit per Year :', CPY[2]);
End.

您缺少一个逗号:

writeLn ('Cost per Year :' CPY[1], ' Profit per Year :', CPY[2]);
                          ^ 
                          ^
应该是

writeLn ('Cost per Year :', CPY[1], ' Profit per Year :', CPY[2]);

您缺少一个逗号:

writeLn ('Cost per Year :' CPY[1], ' Profit per Year :', CPY[2]);
                          ^ 
                          ^
应该是

writeLn ('Cost per Year :', CPY[1], ' Profit per Year :', CPY[2]);

你忘记了逗号在“每年费用”之后。如果错误原来只是一个键入,考虑删除这个问题,因为它不太可能对其他人有用。你忘记了逗号后的“每年费用:”如果错误原来只是一个排错,考虑删除这个问题,因为它不太可能对其他人有用。非常感谢。正如你所悲伤的,这只是一个打字错误。由于某种原因,我看不到这一点。我会删除这项质询。再次感谢,非常感谢。正如你所悲伤的,这只是一个打字错误。由于某种原因,我看不到这一点。我会删除这项质询。再次感谢