Написать программу в visual basic for application к линейному уравнению y=arctg(e^ax*корень(a-x))+b^2+c^2/(b+c)^2
x=1,45 a=3,14 b=5,87 c=6,86
189
461
Ответы на вопрос:
Program gt; var a,b,c,s: real; begin read(a,b,c); if(abs(a)> 1)or(abs(b)> 1)or(abs(c)> 1) then s: =(a+b+c)/3 else s: =a*b*c; writeln(s); end.
Популярно: Информатика
-
AyanCoolgirlBaku19.06.2020 21:31
-
dvolzhenkov21.11.2022 20:12
-
ольга164610.09.2020 00:39
-
Danothka21.03.2022 10:00
-
опв405.09.2020 21:04
-
Дрындель26.05.2023 10:01
-
Nastyaprokopova200328.10.2020 05:38
-
qwejajka12.09.2022 02:59
-
ИэнШоу08.03.2023 23:00
-
azamatyusupov09.09.2021 04:40