Паскаль пишет что " операция = не пременима к типам real и string". Что делать ?program wasd;var a, b:real;beginwriteln('крутите барабан >>>> ');readln(a);if a=('крутить') thenb:= random(50);if (b=25) thenwritenl('вы выйграли автомобиль')elsewriteln('вы проиграли квартиру');end.

У тебя переменная a имеет тип "real" (вещественное число), но в if'e ты пытаешься сравнить вещественное число и строку, чего делать нельзя.

Чтобы решить проблему достаточно изменить тип переменной a на string

Тогда раздел описания будет выглядеть так:

var

b: real;

a : string;

Также у тебя неверно написан оператор writeln в 9 строке.

writeln('вы выиграли автомобиль')