Написать программу, в результате выполнения которой булевская переменная t получает TRUE, если выполняется указанное условие, и FALSE в противном случае (Оператор IF не использовать). Введенные четыре символа образуют слово TRUE.- Pascal(Паскаль) - Справочник юного программиста Pascal/Delphi

Var
  t:Boolean;
  s:string;
begin
  Writeln('Vvod');
  Readln(s);
  t:=(s='true');
  Writeln('t=',t);
  Readln;
end.