По этому заданию таблицу развлетвления составить нужно?
Нет
Написано на Pascal: Program Arrays; Var A: Array [1..14] of Real; f: Array [1..16] of Real; Begin //Здесь писать нужные действия, если нужно. End
После End точка должна стоять, забыл поставить :)