Регистрация
Гилязарт
12.06.2022 08:03
Информатика
Есть ответ 👍

Разработайте проект, в котором у пользователя вашей программы сначала запрашиваются величины трѐх сторон треугольника а, b, c,а затем вычисляется площадь этого треугольника по формуле герона: s= sqrt(p(p-a)(p-b)(p- где р=(a+b+c)/2 – полупериметр. на языке паскаль

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

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

CareyMahoney
CareyMahoney
4,7(81 оценок)
Var a,b,c,s: real; begin writeln( 'vvedite 3 chisla'); readln(a,b,c); s: = sqrt(p*(p-a)*(p-b)*(p-c)); writeln(s); readln end. 
Zaya191
Zaya191
4,7(37 оценок)
1) var n,z: integer; begin z: =0; //z=: 0 знак присваивания выглядит вот так ": =" //n=: 100 - не нужно иницилизировать параметр цикла. for n: = 200 to 500 do begin //for n: =100 to 1000 do begin - цикл должен идти от 200 до 500, а не со 100 до 1000 if n mod 14 = 0 then //if (n div 14 =0) then - div - целая часть от деления, а mod - остаток. z: =z+1; //writeln(n); - выводить n не нужно совсем, а вот увеличить счетчик не помешает //z: =z+1; - а вот тут уже лишнее end; writeln(z); end. 2) -73, выполнится  15 - 8 + 1 =  8 раз

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