Урок 7 Задача 5

Урок 7 Задача 5

Получите от пользователя значения четырёх символьных значения, выясните -- выполняется ли следующее условие:

"""первая переменная равна третьей, не равна второй или третья равна четвертой"""

Составьте по указанному условию логическое выражение и выведите его результат на экран.

program u7z5;

var a,b,c,d: char;


begin

  writeln('vvedite simvol a');
  readln(a);
  writeln('vvedite simvol b');
  readln(b);
  writeln('vvedite simvol c');
  readln(c);
  writeln('vvedite simvol d');
  readln(d);


  writeln('a = c <> b or c = d ' ,(a = c) and (a <> b) or (c = d));
  readln();

end.