Помогиите плееееееес;)

Question

Помогиите плееееееес;)

---

---

Answer 1

Program program1;
var
d, k, l, t, x, y: real;
begin
write('Введите Y, X, T: ');
readln(y, x, t);
d := Power(y, 15);
k := Power(x, 19);
l := Sqr(0.5 + 1 / t) + 1.8 * t;
writeln('D = ', d, ', K = ', k, ', L = ', l);
end.