Форум программистов, компьютерный форум CyberForum.ru

QBasic

Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 15, средняя оценка - 4.73
Zaaza
1 / 1 / 0
Регистрация: 04.04.2011
Сообщений: 57
#1

Вычислить площадь треугольника по 3 сторонам - QBasic

04.04.2011, 10:35. Просмотров 1880. Ответов 1
Метки нет (Все метки)

Помогите пожалуйста выполнить задание на QBasic
Задание вот: [404]
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.04.2011, 10:35     Вычислить площадь треугольника по 3 сторонам
Посмотрите здесь:

Вычислить периметр и площадь треугольника - QBasic
Задана случайное множество точек. Вычислить периметр и площадь треугольника, вершины которого складывают : центр экрана и 2 точки с...

Вычислить площадь треугольника (по любой из известных формул) - QBasic
Вычислить площадь треугольника(по любой из известных формул)

Вычислить площадь и периметр прямоугольного треугольника по катету и гипотенузе - QBasic
1 программа:вычислить площадь и периметр прямоугольного треугольника по катету и гипотенузе 2 программа вычислить площадь треугольника по...

Определить существование треугольника по трем сторонам - QBasic
Написать программу, запрашивающая длину сторон треугольника и после ввода их сообщает: существует треугольник с такими сторонами или нет....

Определить вид треугольника по трем его сторонам - QBasic
определить вид треугольника по трем его сторонам( остроугольный, тупоугольный, прямоугольный)

Определить площадь треугольника - QBasic
Выручите пожалуйста))))))) Нужно закрыть лабы по инфе!!!! Сколько не пишу всё время где-то ошибка(((( 1) Сумма чисел от 1 до 19: ...

Найти площадь треугольника - QBasic
1) Дана сторона равностороннего треугольника. Найти площадь этого треугольника. Длину стороны ввести с клавиатуры или задать с помощью...

Найти периметр и площадь треугольника - QBasic
1) Заданы координаты трех вершин треугольника (x1, y1), (х2, y2), (x3, y3). Найти его периметр и площадь. 2) Написать программу, которая...

Найти гипотенузу и площадь треугольника - QBasic
на рисунке должен быть изображен дождь или снег, дом с окном и дверью, и дерево график-рис 6

Найти периметр и площадь прямоугольного треугольника с катетами a и b - QBasic
Найти периметр и площадь прямоугольного треугольника с катетами a и b.

Вычислите периметр и площадь прямоугольного треугольника по двум катетам - QBasic
Помогите пожалуйста!!! в qbasic: Вычислите периметр и площадь прямоугольного треугольника по двум катетам, имя переменной равно 2 ...

По координатам трёх вершин некоторого треугольника найдите площадь и периметр - QBasic
1)По координатам трёх вершин некоторого треугольника найдите площадь и периметр. 2)Вычислите значения функции z =(a+b+ci)/i,если а...


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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
-immortal-
60 / 60 / 24
Регистрация: 31.01.2011
Сообщений: 105
04.04.2011, 14:42     Вычислить площадь треугольника по 3 сторонам #2
Сообщение было отмечено автором темы, экспертом или модератором как ответ
2)
PureBasic
1
2
3
4
5
6
7
CLS
INPUT "1 storona-"; a
INPUT "2 storona-"; b
INPUT "3 storona-"; c
p = (a + b + c) / 2
s = SQR(p * (p - a) * (p - b) * (p - c))
PRINT "S="; s
Добавлено через 3 минуты
с проверкой условия:
PureBasic
1
2
3
4
5
6
7
8
CLS
1 INPUT "1 storona-"; a
INPUT "2 storona-"; b
INPUT "3 storona-"; c
IF a > (b + c) OR b > (c + a) OR c > (a + b) THEN PRINT "Takogo treugolnika net!!!": GOTO 1
p = (a + b + c) / 2
s = SQR(p * (p - a) * (p - b) * (p - c))
PRINT "S="; s
Добавлено через 11 минут
1)
PureBasic
1
2
3
4
5
6
7
8
9
10
CLS
DATA 2,4
e = 2.71
FOR i = 1 TO 2
    READ x
    y = (SIN((x - 2) ^ (1 / 5)) + e ^ (2 - x))
    y = y / (2 * (COS(x - 2)) ^ 2 * (x - 2))
    y = y * (4 - x)
    PRINT y
NEXT
или:
PureBasic
1
2
3
4
5
6
7
8
9
10
11
CLS
e = 2.71
INPUT "kol-vo X"; n
FOR i = 1 TO n
    PRINT
    INPUT "x-"; x
    y = (SIN((x - 2) ^ (1 / 5)) + e ^ (2 - x))
    y = y / (2 * (COS(x - 2)) ^ 2 * (x - 2))
    y = y * (4 - x)
    PRINT y
NEXT
насчет первого задания не уверен что все верно...
Ответ Создать тему
Опции темы

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