Найдите количество чисел от 1 до n , которые имеют четное количество делителей.
надо написать программу на с++
ввод: 10
вывод: 7
25
169
470
Ответы на вопрос:
Program zadanie; var a, b, c, s, p, pp: real; begin writeln('введите сторону a'); read(a); writeln('введите сторону b'); read(b); writeln('введите сторону c'); read(c); p: =a+b+c; pp: =p/2; if (sqr(a)=sqr(b)+sqr(c)) then begin writeln('прямоугольный треугольник с гипотенузой a'); s: =1/2*b*c; writeln('площадь = ',s); end; if (sqr(b)=sqr(a)+sqr(c)) then begin writeln('прямоугольный треугольник с гипотенузой b'); s: =1/2*a*c; writeln('площадь = ',s); end; if (sqr(c)=sqr(b)+sqr(a)) then begin writeln('прямоугольный треугольник с гипотенузой c'); s: =1/2*b*a; writeln('площадь = ',s); end else begin writeln('непрямоугольный треугольник'); s: =sqrt(pp*(pp-a)*(pp-b)*(pp-c)); writeln('площадь = ',s); end; writeln('периметр = ',p); end.
Популярно: Информатика
-
незнайка333333333311.06.2021 05:44
-
baharaliyeva10.10.2020 03:35
-
kleyman20040410.08.2021 11:09
-
ExploreYT22.04.2022 05:50
-
PolinaS8200105.03.2022 14:00
-
ivandawidov18.01.2022 00:04
-
khgfdl13.09.2020 11:02
-
PisarenkoEV129.07.2020 01:11
-
arakelyankrist01.01.2022 12:19
-
zanna8213.03.2022 15:36