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

Bossip Bossip    2   11.11.2019 06:14    0

Ответы
xawodilal xawodilal  11.08.2020 17:55

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.

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


35 ! как будут выглядеть первые три функции в программе pascal? +записать команды, которые должны ст
ПОКАЗАТЬ ОТВЕТЫ
2003veronika07 2003veronika07  11.08.2020 17:55

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика