Motors Fabric Pascal стоит прибыль

Question

Я только начинаю изучать язык паскаля, новый на этом форуме 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. 

Answer 1

Вы пропускаете запятую:

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

Должно быть

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