Решите примеры ** языке Паскаль пожаалуйстаа прошу!

Question

Решите примеры на языке Паскаль пожаалуйстаа прошу!

---

Answer 1

Program Test;

Var ans1, ans2, ans3: real;

Begin

ans1 := (158 - sqr(12.1)) / 5.1 * 10.2;

ans2 := 256 + (148 + sqr(1.25)) / sqrt(15);

ans3 := sqr(16.2) + 526 / sqrt(9);

Writeln();
Writeln('ans1 = ', ans1);
Writeln('ans2 = ', ans2);
Writeln('ans3 = ', ans3);

End.

P.S. ans1, ans2, ans3 - это ответы на а, б, в соответственно