список студентов, write с буквы Б и с даты рождения Опции

[Дмитрий]

Здравствуйте
помогите распеечатать список студентов, фамилии которых начинаются с буквыы Б, и их даты рождения.

нужно хотя бы 5 студентов
допустим:

Антонов 5,03,1975
Березников 10,05,1975
Булкин 30,11,1974
Уличкин 25,06,1975
Селезнев 6,10,1974

[volvo]

Ну, и как это все задается? Где информация хранится? Файл? Массив?
У телепатов другой форум...

[Гость]

не написано, но видимо массив.

[Гость]

ну поможет мне кто-нибудь????плиз

[volvo]

Ну, если массив - то в чем проблема?

const
  n = 5;
  arr: array[1 .. n] of string =
    ( 'antonov 5,03,1975',
      'bereznikov 10,05,1975',
      'bulkin 30,11,1974',
      'ulichkin 25,06,1975',
      'seleznev 6,10,1974' );

var
  i: integer;

begin
  for i := 1 to n do
    if arr[i][1] = 'b' then writeln(arr[i]);
end.

[Гость]

Большое спасибо!