Напишите пограмму для нахождение площади треугольника по теореме герона.

289

453

Посмотреть ответы 2

Ответы на вопрос:

ропчан

Информатика

4,8(60 оценок)

Var a,b,c,p: real; begin writeln('определение площади треугольника по теореме герона'); write('введите стороны треугольника: '); readln(a,b,c); if (a + b < = c) or (b + c < = a) or (a + c < = b) then writeln ('треугольника с такими сторонами не существует') else begin p: =(a+b+c)/2; writeln('площадь треугольника равна ',sqrt(p*(p-a)*(p-b)*(p-c)): 0: 3) end end.

GoodArtur

Информатика

4,7(13 оценок)

// f# [< entrypoint> ] let main argv = let getrandomcollection n = let rand = new system.random() array.map (fun x -> rand.next(-10, 10)) [| 1..n |] let inputarray = getrandomcollection 15 printf "source array: %a\n" (inputarray |> array.tolist) // first part printf "numbertocheckonequal: " let numbertocheckonequal = system.console.readline() |> system.int32.parse let indecesequalstonumber = inputarray |> array.mapi (fun i x -> (x, i)) |> array.filter (fun (x, i) -> x = numbertocheckonequal) |> array.map (fun (x, i) -> i) |> array.tolist printf "%d equals to %d: %a\n" (indecesequalstonumber |> list.length) numbertocheckonequal indecesequalstonumber // second part printf "a: " let a = system.console.readline() |> system.int32.parse printf "b: " let b = system.console.readline() |> system.int32.parse let sum = inputarray.[a..b] |> array.sum printf "sum of array [%d..%d]: %d\n" a b sum // last part let finalarray = inputarray |> array.map (fun x -> if x < 0 then x*x else x) printf "final array: %a" finalarray system.console.readkey true |> ignore 0

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.