Верно ли я ввела? program z_2; var a, b, c: integer; begin read (a,b,c); if (a> b) and (a> c) then write ('наибольшее',a) else if (b> a) and (b> c) then write ('наибольшее',b) else if (c> a) and (c> b) then write ('наибольшее',c); end. мне выдает, что 4 строка имеет неверный формат может, что-нибудь неверно?

Отформатированный текст работающей программы

program Z_2;

var
 a, b, c:integer;

begin
  Read (a,b,c);
  if (a>b) and (a>c) then
    Write ('наибольшее ',a)
  else
    if (b>a) and (b>c) then
      Write ('наибольшее ',b)
    else
      if (c>a) and (c>b) then Write ('наибольшее ',c)
end.