Question

Задание 3(2). С клавиатуры вводятся две строки. Составьте программу, которая: А) Выводит на экран более длинную строку; Б) Выводит на экран более короткую строку.

Answer 1

A)

var s,s1: string;

begin

readln(s);

readln(s1);

if length(s)> length(s1)

then write(s) else

write(s1);

end.

Б)

var s,s1: string;

begin

readln(s);

readln(s1);

if length(s)<length(s1)

then write(s) else

write(s1);

end.