урок 8 задача 6

урок 8 задача 6

Получите от пользователя четыре строковых значения, выведете на экран результат проверки условия:

var

 a,b,c,f :string;
begin
 writeln('присвойте значение 4 строковым литералам по 3 буквы');
 readln(a,b,c,f);
 writeln(a=c and a=f or f=c);

 readln();
end.                          
vedro-compota's picture

добавлен разбор в урок

_____________
матфак вгу и остальная классика =)