Question

Требуется написать программу, которая по заданным значением A, C, D и K находит значение выражения (A+(D−12)⋅3)⋅(C−5⋅K).

Answer 1

var

  A, C, D, K:integer;

  res:integer;

   

begin

  Write('Введите A, C, D, K: ');

  Readln(A, C, D, K);

   

  res := (A + (D - 12) * 3) * (C - 5 * K);

   

  Writeln('Результат: ', res);

end.