Написать программу функции y=(a^2-2b-c^2)/3ab при значениях a=20 b=10 c=14
300
500
Ответы на вопрос:
Var a,b,c: real; begin write('a = '); readln(a); write('b = '); readln(b); write('c = '); readln(c); write('y = ',(a*a-2*b-c*c)/(3*a*b)); end.
var x: integer;
begin
readln(x);
if x > 0 then
writeln('true')
else writeln('false');
end.
Популярно: Информатика
-
egor22813372209.02.2022 17:05
-
arven8804.02.2020 07:19
-
soffi200613.07.2022 10:40
-
влад230508.09.2021 02:52
-
XXX231xxx19.01.2020 11:08
-
mainstal01.04.2020 18:43
-
dkniga04115.10.2020 14:10
-
Matvey228133723.07.2022 03:58
-
itsnastyad02.03.2021 01:48
-
Polinaklass1228.12.2021 18:50