Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.56/25: Рейтинг темы: голосов - 25, средняя оценка - 4.56
1 / 1 / 0
Регистрация: 07.09.2014
Сообщений: 40
1

Написать программу, которая находит площадь треугольника по 2 сторонам и углу

13.10.2014, 23:12. Показов 4860. Ответов 1
Метки нет (Все метки)

Задание: Написать программу, которая находит площадь треугольника по 2 сторонам и углу.
Код:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
program treygolnik;
var
a,b,y: real;
S: real;
begin
write ('vvedite polozhitelnoe 4islo a');
writeln(a);
if a>0 then write ('error: a < 0') 
else
write('vvedite polozhitelnoe 4islo b');
if b>0 then write ('error: b < 0')
else
writeln(b);
write('vvedite y, 1=<0=<1');
if y>=1 then write ('error: y ne prinadlezhit ODZ')
else
if y<=-1 then write ('error: y ne prinadlezhit ODZ')
else
S:=(0.5*(a*b))*sin(y);
writeln ('y= ');
end.
почему ошибка?
0
Заказывайте контрольные, курсовые и дипломы здесь.
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.10.2014, 23:12
Ответы с готовыми решениями:

Написать функцию, которая находит площадь N угольника по его сторонам
Написать функцию (или макроопределение), которая находит площадь треугольника по его сторонам....

Написать функцию, которая находит радиус вписанной окружности по трем сторонам треугольника.
Написать функцию, которая находит радиус вписанной окружности по трем сто- ронам треугольника.

Площадь треугольника по 2 сторонам и углу между ними.
Написать функцию вычисления площади треугольника по 2 сторонам и углу между ними Помогите...

Площадь и периметр треугольника по двум сторонам и углу между ними
#include &lt;stdio.h&gt; #include &lt;math.h&gt; #include &quot;stdafx.h&quot; //Считаем площадь и периметр void...

1
охотник
1011 / 535 / 650
Регистрация: 29.09.2014
Сообщений: 1,083
13.10.2014, 23:32 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program treygolnik;
var a,b,y: real;
    S: real;
begin
 repeat 
  writeln ('vvedite polozhitelnoe 4islo a');
  readln(a);
 until a>0; 
 repeat
  writeln('vvedite polozhitelnoe 4islo b');
  readln(b);
 until b>0;
 repeat
  writeln('vvedite y, -1<=y<=1');
  readln(y)
 until (y>=-1)and(y<=1); 
S:=(0.5*(a*b))*sin(y);
writeln ('y= ',s:0:5);
end.
Ваша программа, подправил
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
13.10.2014, 23:32

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Определить площадь треугольника по двум сторонам и углу между ними
1.Определить площадь треугольника по двум сторонам и углу между ними. 2.Найти произведение цифр...

Найти площадь треугольника по двум сторонам и углу между ними
Пусть даны числа a, b, y. Найдите площадь треугольника, две стороны которого равны a и b, а угол...

Вычислить площадь треугольника по двум сторонам и углу между ними
консольное приложение, вычислить площадь треугольника по двум сторонам и углу между ними

Найдите площадь треугольника, по двум сторонам и углу между ними
программа вв системе си


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.