Информатика

Геннаша

28 октября, 10:53

Информатика. Скажите, почему пишет про последнюю строчку "Встречено '.', а ожидалось '; ' ", если это конец цикла?

program a_1;

var a, d: integer; k: integer;

begin

writeln ('Кол-во деталей') ;

writeln ('Введите кол-во деталей за первый час') ;

readln (a) ;

writeln ('Введите d') ;

readln (d) ;

writeln ('Введите кол-во часов работ') ;

readln (k) ;

a:=a+d;

begin

for i: = 2 to k do begin

writeln ('Кол-во деталей') ;

end;

end.