Question

Помогите пожалуйста
Составьте программу,которая предлагает ввести  с клавиатуры две строки s и t и выводит на экран более длинную строку.
Пример ввода:
школа  (Строка s)
ученик (Строка t)
Пример вывода :
ученик 

Answer 1

var s,t:string;
begin
write('Введите первую строку: ');
readln(s);
write('Введите вторую строку: ');
readln(t);
write('Ответ: ');
if length(s)>length(t) then
  writeln(s)
  else writeln(t);
end.