Форум программистов, компьютерный форум CyberForum.ru Форум программистов | Компьютерный форум | Форум web-программистов | Форум по электронике и бытовой технике | Форум о софте | Научный форум | Карьера и бизнес
CyberForum.ru - форум программистов и сисадминов > > >
Восстановить пароль Регистрация

Ответ Создать новую тему
 
Zaaza
Форумчанин
1 / 1 / 0
Регистрация: 04.04.2011
Сообщений: 57
04.04.2011, 10:35     Площадь треугольника по 3 сторонам
  #1
Помогите пожалуйста выполнить задание на QBasic
Задание вот: http://s46.***********/i112/1104/bc/61e66d868587.png
AdAgent
Объявления
04.04.2011, 10:35
-immortal-
Форумчанин
60 / 60 / 3
Регистрация: 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
насчет первого задания не уверен что все верно...
Yandex
Объявления
04.04.2011, 14:42
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать новую тему

Похожие темы
Тема Раздел Автор Дата
QBasic Вычислить периметр и площадь треугольника
Задана случайное множество точек. Вычислить периметр и площадь треугольника, вершины которого складывают : центр экрана и 2 точки с заданного множества больше всего отдаленного от центра экрана. Сижу...
QBasic Karagen 16.05.2014 18:42
QBasic Какова площадь статистического треугольника?
Здесь речь идёт не о конкретном треугольнике, а о их совокупности. Дано: квадрат со стороной равной 1. В этом квадрате задаются случайно расположенные треугольники. Требуется вычислить какую...
QBasic gehh 11.05.2014 16:33
QBasic QBasic и площадь треугольника
Сегодня я решил предложить вашему вниманию интересную программу, которая вычисляет площадь треугольника сначала своим способом, а потом по известной формуле. Она выдаёт оба результата плюс...
QBasic gehh 04.05.2014 14:05
Basic Как найти площадь треугольника по трём сторонам и площадь круга по по его радиусу
Найдите площадь триугольника по трём сторонам и площадь круга по по его радиусу а-2,8см, b-3,6см c-4,1cм r-8,2см.
Basic Grenny 02.06.2013 22:35
Visual Basic Найти площадь треугольника по 3 сторонам
Найти площадь треугольника по 3 сторонам. Если можно написать математическую модель и алгоритм и код программы
Visual Basic nikita7991 16.04.2013 20:30
JavaScript Надо площадь треугольника по его сторонам a, b, c
Уважаемые знающие люди, помогите пожалуйста. задали по веб-программингу вот. Надо площадь треугольника по его сторонам a, b, c. вот собственно и всё. надо сделать в виде окошка, ну примерно вот...
JavaScript Sashok1992 25.05.2012 23:18
QBasic определить вид треугольника по трем его сторонам
определить вид треугольника по трем его сторонам( остроугольный, тупоугольный, прямоугольный)
QBasic наташка-ромашка 07.03.2011 00:57
QBasic определить площадь треугольника
Выручите пожалуйста))))))) Нужно закрыть лабы по инфе!!!! Сколько не пишу всё время где-то ошибка(((( 1) Сумма чисел от 1 до 19: х+(х^2)/(1+2!)+(x^3)/(1+3!)+...+(x^n)/(1+n!)=? x= от0,125 до 2 с...
QBasic Free style 13.06.2009 19:53
Опции темы

Текущее время: 15:14. Часовой пояс GMT +4.

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