Найти значение переменной x, Если x = (a + 3(d – 12))x( c – 5k), а значения переменных a. d, c, k, задаются с клавиатуры

begin var a, d, c, k: real; Writeln('Введите а'); Readln(a); Writeln('Введите d'); Readln(d); Writeln('Введите c'); Readln(c); Writeln('Введите k'); Readln(k); Writeln('Икс равен ', (a + (3 * (d - 12) * (c - (5 * k)))));end.