Найти значение переменной 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.
Оцени ответ
