работа со строками и записями

[eXTrEMe888]

Привет народ!!очень нужна ваша помощь в составлении кода программы (точнее основных частей) по таким вопросам (у меня не оч получается пока что то):
Работа со строками:
1.Удалить из заданного текста все пробелы, подсчитать длину получившегося текста и число удаленных пробелов.
Работа с записями:
Составить список, содержащий сведения об N студентах. Для каждого учащегося указать:
- фамилия;
- ИНН (идентификационный номер налогоплательщика);
- дата выдачи Свидетельства о постановке на учет в налоговом органе;
- дата рождения;
- год поступления в университет;
- курс;
- группа;
- количество семестров обучения;
- оценки каждой сессии по всем семестрам.
Информацию о каждом студенте оформить в виде записи. Совокупность записей объединить в массив. Составить программу, которая обеспечивает ввод исходных данных, обработку и вывод на экран информации

2.Вывести на экран оценки за последнюю сессию всех студентов, фамилии которых начинаются на буквы Б, В, Г. N = 7.

ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО!!! =)))

[BHy4ok]

1. while pos(' ',S)>0 do begin delete(s,pos(' ',S),1);
Length(S);
Ищите подобные задачи на форуме, уже обсуждалось.

[Хыиуду]

1. while pos(' ',S)>0 do begin delete(s,pos(' ',S),1);
Length(S);

Тогда уж
prev_len:=length(s);
while pos(' ',S)>0 do begin delete(s,pos(' ',S),1);
spaces_deleted:=prev_len-length(s);

[XTen]

Пиши, решу
ICQ: 410-691-984