Question

35 балллов!!!Как будут выглядеть первые три функции в программе Pascal?+записать команды, которые должны стоять перед функциями

Answer 1

begin

 var (a, b, c) := (1.5, 2.0, -0.75);

 var x := ReadReal('Введите x');

 var y := a * Exp(-Sqrt(x)) * Cos(b * x) + c;

 Println(y);

 (a, b, c) := (2, 0.7, 0.5);

 var t := ReadReal('Введите t');

 var z := a * Cos(b * t * Sin(t)) + c;

 Println(z);

 (a, b) := (2, 1.2);

 z := Sqrt(a + b * Exp(Sin(x)) + 1);

 Println(z);

end.

Пример диалога дан на картинке

Answer 2

begin

 var (a, b, c) := (1.5, 2.0, -0.75);

 var x := ReadReal('Введите x');

 var y := a * Exp(-Sqrt(x)) * Cos(b * x) + c;

 Println(y);

 (a, b, c) := (2, 0.7, 0.5);

 var t := ReadReal('Введите t');

 var z := a * Cos(b * t * Sin(t)) + c;

 Println(z);

 (a, b) := (2, 1.2);

 z := Sqrt(a + b * Exp(Sin(x)) + 1);

 Println(z);

end.