var
a, d, c, k: <em>real</em>;
begin
readln(a, d, c, k);
writeln((a - (d + 21) * 2) * (c - 7 * k));
end.
X*x+2*x-15=0
решаем кв уравнение
x=3
По горизонтали: 2. поведение, 4. действие, 6. единичное, 7. свойство, 9. множество, 10. объект
по вертикали: 1. состояние, 2. признаки, 3. информатика, 5. собственное, 8. общее