Дано 4 числа. Если посреди их найдется число 999, то напечатать

program zz1;
var a, b, c, d:integer; // задаем переменные целого типа
begin
write( введите 1-ое число ); // вводим с клавиатуры 1-ое число
read(a);
write( введите второе число ); // вводим с клавиатуры второе число
read(b);
write( введите третье число ); // вводим с клавиатуры третье число
read(c);
write( введите 4-ое число ); // вводим с клавиатуры четвертое число
read(d);
if (a = 999) or (b = 999) or (c = 999) or (d = 999) then write(a, , b, , c, , d)
else write( сумма 2-ух последних = , c + d);
end.