1-ая задача:

Ввести анкету студента как одно единое данное. Анкета включает в себя следующие поля:
- фамилия студента - 10 симв.
- пол студента - 1 симв.
- дата рождения студента - 10 симв. (В виде ДД.ММ.ГГГГ)
Одно поле анкеты отделяется от другого одним пробелом.
Распечатать введенный данные в следующей таблице:

http://s017.radikal.ru/i429/1112/0e/c8a5f9cf6635.jpg

2-ая задача:
Ввести три строковых именных, содержащие календарные даты в виде ГГГГ.ММ.ЧЧ. Выбрать и распечатать наиболее раннюю дату.

Очень прошу помочь мне с этими заданиями, так как сам я не в зуб ногой в этой теме (IMG:style_emoticons/default/sad.gif) Заранее спасибо!

С типом запись знакомы?

ну да, а что?

2. Пусть в переменной s хранится ваша дата. Разберем ее на составляющие.
PosDot:=Pos('.',s); {Ищем позицию точки в строке}
YearStr:=Copy(s,1,PosDot-1); {выделяем подстроку с первого символа в количестве PosDot-1 символ}
val(YearStr,Year,error); {преобразовываем стоку в число}
delete(s,1,PosDot); {удаляем обработанную подстроку вместе с точкой}

Аналогично выделяется месяц, а день - это то, что останется.


Дальше справитесь?