Question

составьте программу, которая предлагает ввести с клавиатуры две строки s и t и выводит на экран более длинную строку.​

Answer 1

var t,s: string;

begin

writeln('Введите 2 строки:');

readln(s);

readln(t);

if length(t)>length(s) then write('более длинная строка: ',t)

else if length(t)=length(s) then write('строки равны')

else write('более длинная строка ',s);

end.