Составте программу ,которая предлагает ввести с клавиатуры две строки s и t и вывод

Составте программу ,которая предлагает ввести с клавиатуры две строки s и t и выводит на экран наиболее длинную строку
Гость
Ответ(ы) на вопрос:
Гость
Var s1,s2: string ;  d1,d2 : integer; begin writeln ('1 stroka'); read (s1); writeln ('2 stroka'); read (s2); d1:=length(s1); d2:=length(s2); if d1>d2 then  writeln (s1) else writeln (s2); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы