Задача на массив, Легкая задача на массив Опции

[sanion]

Задан массив фамилий C(20). ВЫДАТЬ НА ЭКРАН ФАМИЛИИ, СОДЕРЖАЩИЕ БУКВО СОЧЕТАНИЕ "МЕД" (Ахмедов, Самедов и т.д.)

[TarasBer]

Массив описывается так:

var
a: array [1 .. 20] of extended;

Это массив из 20 элементов типа extended, причём нумеруются они от 1 до 20.
Обращение к элементу по индексу i делается так: a[i]
Например, a[i] := 34;
Или a[5] := a[4];

В твоём случае нужен массив элементов типа string.
К каждому из них надо применить функцию Pos (в справке про неё всё есть).