Сформулируем содержательную постановку задачи: Создать приложение на VB которое должно вычислять периметр и площадь треугольника по заданным значениям трех его сторон:
Задано: А, В, С – значения сторон треугольника.
Требуется определить: Р – периметр треугольника, S – площадь треугольника.
Ограничения на значения исходных данных и их соотношения: А>0, В>0, C>0, А+В>С, А+C>В, В+C>А одновременно.
- две кнопки управления;
- три поля, отображающие входные данные;
- два поля, отображающие выходные данные.
Формализация и уточнение задания:
Для решения задачи существуют известные формулы:
Р = А + В + С;
S = (формула Герона),
Print-Screen разработанного проекта с результатами
Код программы
Option Strict On
Option Explicit On
Imports System.Math
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, _
Найти площадь и периметр прямоугольного треугольника по двум катетам. Решение задачи на Python
ByVal e As System.EventArgs) Handles Button1.Click
Dim A, B, C As Single
Dim P, Pp, S As Single
B = CSng(TextBox4.2.Text)
‘Присваивание переменной В значения поля TextBox2
A = CSng((TextBox1.Text))
‘Присваивание переменной А значения поля TextBox1
C = CSng((TextBox3.Text))
‘Присваивание переменной С значения поля TextBox3
P = (A + B + C)
‘Вычисление периметра и присваивание значения Р
Pp = P / 2
‘Вычисление полупериметра и присваивание значения Рр
S = CSng((Sqrt(Pp * (Pp — A) * (Pp — B) * (Pp — C))))
‘Вычисление площади и присваивание значения переменной S
TextBox4.Text = CStr(P)
‘Вывод значения полупериметра в текстовое поле TextBox4
TextBox5.Text = CStr(S)
‘Вывод значения площади в текстовое поле TextBox5.
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button4.2.Click
End
End Sub
End Class
Источник: reshimvse.com
Напишите программу для вычисления периметра и площади прямоугольного треугольника по заданным длинам двух катетов a и
Program vashurok;
var a, b, p, s, s2 : real;
begin
Writeln(‘введите первый катет’);
Read(a);
Writeln(‘введите второй катет’);
Read(b);
s:=(a*b)/2;
Writeln(‘площадь -‘, s);
s2:=sqrt(sqr(a)+sqr(b));
p:=a+b+s2;
Writeln(‘периметр -‘, p);
end.
Как добавить хороший ответ?
Что необходимо делать:
- Написать правильный и достоверный ответ;
- Отвечать подробно и ясно, чтобы ответ принес наибольшую пользу;
- Писать грамотно, поскольку ответы без грамматических, орфографических и пунктуационных ошибок лучше воспринимаются.
Что делать не стоит:
- Списывать или копировать что-либо. Высоко ценятся ваши личные, уникальные ответы;
- Писать не по сути. «Я не знаю». «Думай сам». «Это же так просто» — подобные выражения не приносят пользы;
- Писать ответ ПРОПИСНЫМИ БУКВАМИ;
- Материться. Это невежливо и неэтично по отношению к другим пользователям.
Пример вопроса
Найти площадь прямоугольника, треугольника или круга. Решение задачи на Python
Русский язык
7 минут назад
Какой синоним к слову «Мореплаватель»?
Пожаловаться
Хороший ответ
Вася Иванов
Мореплаватель — имя существительное, употребляется в мужском роде. К нему может быть несколько синонимов.
1. Моряк. Старый моряк смотрел вдаль, думая о предстоящем опасном путешествии;
2. Аргонавт. На аргонавте были старые потертые штаны, а его рубашка пропиталась запахом моря и соли;
3. Мореход. Опытный мореход знал, что на этом месте погибло уже много кораблей, ведь под водой скрывались острые скалы;
4. Морской волк. Старый морской волк был рад, ведь ему предстояло отчалить в долгое плавание.
Источник: uchi.ru
4.1.5. Создание самостоятельно второго проекта «Вычисление периметра и площади треугольника»
вылезти за поля. Тело процедуры, которое находится между заголовком процедуры и оператором, завершающим процедуру – Sub…End Sub , будет исполняться каждый раз, когда пользователь активизирует элемент интерфейса, ассоциированный с этой процедурой. В данном случае событие — это щелчок мышью на кнопке Button2 , но как будет показано далее, это может быть и другой тип события.
Между заголовком и концом процедуры ввести оператор End , а затем нажать на клавишу со стрелкой вниз. После ввода оператора буквы становятся синими и создаются отступы, что указывает, что VB распознал End как одно из нескольких сотен зарезервированных — или ключевых слов языка VB . Ключевое слово End используется для остановки программы и удаления с экрана ее формы.
В данном случае End также является законченным оператором программы, то есть инструкцией, исполняемой компилятором VB. Напомним, что компилятор – это часть VS , обрабатывающая и выполняющая анализ каждой строки исходного кода VB , и объединяющая результаты с другими ресурсами с целью создания исполняемого файла.
Все операторы программы должны следовать грамматическим правилам компилятора. В VS операторы программ могут состоять из ключевых слов, свойств, имен объектов, переменных, чисел, специальных символов и других значений.
При вводе операторов программы и внесении других изменений, окно Редактор кода (Code Editor) выполняет многие задачи, связанные с форматированием, включая настройку отступов, пробелов и добавление необходимых скобок. Точное написание, оператора программы называется синтаксисом оператора . При нажатии на клавишу «стрелка вниз» оператор End был сдвинут вправо так, чтобы он был отделен от операторов Private Sub и End Sub . Эта схема форматирования является одним из соглашений программирования и предназначена для того, чтобы программы выглядели ясно и читаемо.
Соглашения относительно того, как организуется код в программе, часто называется стилем программирования . Теперь, когда написан код, связанный с кнопкой Завершить , необходимо написать код для кнопки Вычислить . 2. Написать программный код, который будет выполняться при нажатии кнопки ВЫЧИСЛИТЬ , то есть событийную процедуру для кнопки Button1 . Чтобы отобразить форму, щелкнуть в окне Обозреватель решений (Solution Explorer) на кнопке Конструктор (View Designer ). В режиме Редактор программного кода (Code Editor) форма, с которой производится работа, не отображается. Кнопка Конструктор (View Designer) является одним из тех механизмов, которые используются для того, чтобы снова вывести форму на экран.
Также можно щелкнуть на вкладке Form1.vb [Design]. Дважды щелкнуть мышью на кнопке ВЫЧИСЛИТЬ . Через некоторое время появится окно Редактор кода (Code Editor), и рядом с процедурой события, связанной с кнопкой Button2 , появится процедура события, ассоциированная с кнопкой Button1 . Хотя текст этой кнопки был изменен на « ВЫЧИСЛИТЬ », ее имя в программе осталось Button1 . (Имя и текст элемента интерфейса могут быть различными для удобства программирования.) Каждый объект может иметь несколько связанных с ним процедур — по одной для каждого распознаваемого события. Между операторами Private Sub Button1_Click( ) и End Sub необходимо ввести строки программы, показанные на рис. 4.1-8. Private Sub Button1_Click( ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click Тема 4.1. ЛР «Интегрированная среда разработкиVS.NET и основныепонятия » Страница 23
Dim A As Single , B As Single , C As Single
Dim P As Single , Pp As Single , S As Single
B = TextBox2.Text ‘Присваивание переменной В значения поля TextBox2 A = TextBox1.Text ‘Присваивание переменной А значения поля TextBox1 C = TextBox3.Text ‘Присваивание переменной С значения поля TextBox3 P = (A + B + C) ‘Вычисление периметра и присваивание значения Р Pp = P / 2 ‘Вычисление полуперим. и присваивание значения Рр
S = Sqrt(Pp * (Pp — A) * (Pp — B) * (Pp — C))
‘Вычисление площади и присваивание значения переменной S TextBox4.Text = CStr(P)
Источник: studfile.net