задача Pascal ABC

[EvilCry]

помовите решить задачку) очень срочно!
ввести 2 строки(любые). Написать программу, которая выведет слово, полученное из первых букв данных строк.
Тема: строчный тип данных.

[Noor]

var pre1,pre2:string;
begin
writeln;
write('Vvedite predlogenie 1: ');
readln(pre1);
write('Vvedite predlogenie 2: ');
readln(pre2);
writeln(pre1[1]+''+pre2[1]);
end.

[EvilCry]

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