Написать программу которая вычисляет силу тока в электрической цепи делфи

Содержание

Презентация 10 класса на тему: «Открытый урок «Закон Ома. Создание приложения в Delphi» 10 класс.». Скачать бесплатно и без регистрации. — Транскрипт:

1 Открытый урок «Закон Ома. Создание приложения в Delphi» 10 класс

2 Назовите основные свойства компонентов Delphi Label RadioGroup Edit Button BitBtn CheckListBox Caption Items Text Caption Kind Items ? ? ? ? ? ?

3 Тест «Найди пару» a)Run b)CheckListBox c)BitBtn d)Button e)RadioGroup f)Label g)Memo h)Edit

4 Проверьте ответы 1-f 2-h 3-d 4-e 5-b 6-c 7-a 8-g

5 Закон Ома для участка цепи физика

6 Закон Ома для участка цепи UI R = __ Сила тока прямо пропорциональна напряжению тока и обратно пропорциональна сопротивлению тока на участке цепи.

7 Следствие Сила тока, А Напряжение, В Сопротивление, Ом

8 Задача. Создать приложение, которое будет автоматически вычислять неизвестный параметр Закона Ома для участка цепи по известным двум другим параметрам.

9 Этапы создание приложения. 1 этап – создание отдельной директории для приложения; 2 этап – создание главной формы; 3 этап – сохранение всего проекта в отведенную для него папку; 4 этап — расположение компонентов на форме; 5 этап – программирование событий; 6 этап – компиляция и отладка программы.

Как сделать нейросеть в Delphi

10 1 этап Закон Ома Создадим папку Закон Ома в своей папке.

11 2 этап Запустите Delphi Если отсутствует главная форма Application, то создайте ее, выполнив команды File-New-Application

12 3 этап Сохраните проект в созданной на первом этапе папке, выполнив команду File – Save All

Читайте также:
На играх 4 олимпиады легкоатлеты из какой страны доминировали во всех видах программы

13 4 этап Расположите на форме следующие компоненты RadioGroup1 Label1 Label3 Label5 Label2 Label4 Edit1 Edit2 Button1 BitBtn1 Panel1 Label6

14 5 этап 1. Создать вывод подписей компонентов Label в зависимости от выбора параметра для расчета: напряжение Например, Если в RadioGroup1 мы выбираем опцию напряжение, то значения Label1, Label2, Label3, Label4, Label5, Label6 меняют свойство Caption соответственно на Сила тока, Ампер, Сопротивление, Ом, Напряжение, Вольт

15 Следовательно событие выбора опции Напряжение опишем в окне кода Сила тока Сопротивление Самостоятельно запрограммировать выбор опций Сила тока и Сопротивление

16 Программируем кнопку Рассчитать edit1 edit2 U=IR Если выбрана опция напряжение, то результатом будет произведение значений edit1 и edit2, т.е. используем формулу U=IR Panel1 Результат выведем на компонент Panel1

17 Программируем… Если выбран индекс в RadioGroup1 =1 В свойство Caption компонента Panel1 Преобразуем текст из компонента edit1 в числовой вещественный тип Преобразуем текст из компонента edit2 в числовой вещественный тип Полученное число преобразуем в строку Самостоятельно запрограммировать кнопку Рассчитать на расчет выбранных опций Сила тока и Сопротивление

18 6 этап Запустите приложение. Произведите отладку, если есть ошибки. Заполните таблицу, применив для расчетов созданную программу. I, АмперU, ВольтR, Ом 2,4?4,9 ? ,006123,145? 4,95?1,2 3180,14? ?93,5

Тест на Delphi

19 Домашнее задание Задача. Выполнить приложение, которое по введенным длине (а) и ширине (b) прямоугольника будет рассчитывать периметр (P) или площадь (S) в зависимости от выбранной опции.

20 Условия успешности выполнения приложения Идти, не сгибаясь, Идти до конца, Идти, улыбаясь, И в поте лица. Идти, что отпущено, Надо прожить. Идти, не стремясь По течению плыть. Пешком иль иначе – Преграды смести. Идти – это значит До цели дойти.

Источник: www.myshared.ru

Учебники. Программирование для начинающих.

The Elder Scrolls V: Skyrim Skyrim — это ролевая игра, происходящая в фэнтезийном мире, где игрок управляет Довакином, героем vsedirki, который должен спасти мир от драконов. В ходе игры игрок исследует огромный мир, выполняет задания, борется с монстрами и принимает решения, которые влияют на ход сюжета.

Programm.ws — это сайт, на котором вы можете почитать литературу по языкам программирования , а так-же посмотреть примеры работающих программ на С++, ассемблере, паскале и много другого..

Программирование — в обычном понимании, это процесс создания компьютерных программ.
В узком смысле (так называемое кодирование) под программированием понимается написание инструкций — программ — на конкретном языке программирования (часто по уже имеющемуся алгоритму — плану, методу решения поставленной задачи). Соответственно, люди, которые этим занимаются, называются программистами (на профессиональном жаргоне — кодерами), а те, кто разрабатывает алгоритмы — алгоритмистами, специалистами предметной области, математиками.
В более широком смысле под программированием понимают весь спектр деятельности, связанный с созданием и поддержанием в рабочем состоянии программ — программного обеспечения ЭВМ. Более точен современный термин — «программная инженерия» (также иначе «инженерия ПО»). Сюда входят анализ и постановка задачи, проектирование программы, построение алгоритмов, разработка структур данных, написание текстов программ, отладка и тестирование программы (испытания программы), документирование, настройка (конфигурирование), доработка и сопровождение.

Читайте также:
Программа чтобы ноутбук сам включался

Delphi в задачах и примерах

Общие замечания

14. Написать программу, которая, используя закон Ома, вычисляет силу тока, напряжение или сопротивление электрической цепи.

Рекомендуемый вид формы приведен на рис. 1.11. Во время работы программы, в результате выбора переключателя Ток, Напряжение или Сопротивление, текст, поясняющий назначение полей ввода, должен меняться.

Рис. 1.10. Форма программы Сила тока

Рис. 1.11. Форма программы Закон Ома

// вычисление тока, напряжения или сопротивления
procedure Calculate;
var
I,U,R: real; // ток, напряжение, сопротивление begin
if Forml.RadioButtonl.Checked then
// ток
begin
U := StrToFloat(Forml.Edit1.Text) ;
R := StrToFloat(Forml.Edit2.Text); if (R <> 0) then begin
I := U/R;
Forml.Label3.Caption := ‘Ток: ‘ + Float-ToStrF(I,ffFixed,4,2) + ‘ a’;
end
else ShowMessage(‘Сопротивление не должно быть равно нулю.’), exit; end;
if Forml.RadioButton2.Checked then
// напряжение
begin
I := StrToFloat(Forml.Editl.Text);
R := StrToFloat(Forml.Edit2.Text) ; U := I*R;
Forml.Label3.Caption := ‘Напряжение: ‘ +
FloatToStrF(U,ffFixed,4,2) exit; end;
if Forml.RadioButton3.Checked then
// сопротивление
begin
U := StrToFloat(Forml.Editl.Text); 1
:- StrToFloat(Forml.Edit2.Text); if (I <> 0) then begin
R := U/I;
Forml.Label3.Caption := ‘Сопротивление:
‘ + Float-ToStrF(R,ffFixed,4,2) + ‘ Ом’; end
else ShowMessage(‘Ток не должен быть равен нулю.’); end;
B’;
end;
.
// Выбор переключателя Ток
procedure TForml.RadioButtonlClick(Sender: TObject);
begin
Labell.Caption := ‘Напряжение (вольт)’;
Label2.Caption := ‘Сопротивление (Ом)’;
Labe13.Caption := »; end;
// Выбор переключателя Напряжение
procedure TForml.RadioButton2Click(Sender: TObject);
begin
Labell.Caption := ‘Ток (ампер)’;
Label2.Caption : = ‘Сопротивление (Ом)’;
Label3.Caption : Code»>// Щелчок на кнопке Вычислить
procedure TForml.ButtonlClick(Sender: TObject);
begin
if (Editl.Text <> ») and (Edit2.Text О «]
then Calculate // вычислить ток, напряжение или сопротивление
else ShowMessage(‘Надо ввести исходные данные в оба поля’); end;

Источник: programm.ws

Интегрированный урок «Закон Ома. Создание приложения в Delphi»

Интегрированный урок «Закон Ома. Создание приложения в Delphi»

Шибеко Марина

Закон Ома для участка цепи Сила тока прямопропорциональна напряжению тока и обратнопропорциональна сопротивлению тока на участке цепи

Закон Ома для участка цепи Сила тока прямопропорциональна напряжению тока и обратнопропорциональна сопротивлению тока на участке цепи

Закон Ома для участка цепи

Читайте также:
Как убрать автообновление программ

Сила тока прямопропорциональна напряжению тока и обратнопропорциональна сопротивлению тока на участке цепи.

Следствие Сила тока, А Напряжение,

Следствие Сила тока, А Напряжение,

Задача . Создать приложение, которое будет автоматически вычислять неизвестный параметр

Задача . Создать приложение, которое будет автоматически вычислять неизвестный параметр

Задача. Создать приложение, которое будет автоматически вычислять неизвестный параметр Закона Ома для участка цепи по известным двум другим параметрам.

Этапы создание приложения. 1 этап – создание отдельной директории для приложения; 2 этап – создание главной формы; 3 этап – сохранение всего проекта в отведенную…

Этапы создание приложения. 1 этап – создание отдельной директории для приложения; 2 этап – создание главной формы; 3 этап – сохранение всего проекта в отведенную…

Этапы создание приложения.

1 этап – создание отдельной директории для приложения;
2 этап – создание главной формы;
3 этап – сохранение всего проекта в отведенную для него папку;
4 этап — расположение компонентов на форме;
5 этап – программирование событий;
6 этап – компиляция и отладка программы.

Создадим папку Закон Ома в своей папке

Создадим папку Закон Ома в своей папке

Создадим папку Закон Ома в своей папке.

Запустите Delphi Если отсутствует главная форма

Запустите Delphi Если отсутствует главная форма

Запустите Delphi
Если отсутствует главная форма Application, то создайте ее, выполнив команды File-New-Application

Сохраните проект в созданной на первом этапе папке, выполнив команду

Сохраните проект в созданной на первом этапе папке, выполнив команду

Сохраните проект в созданной на первом этапе папке, выполнив команду File – Save All

Расположите на форме следующие компоненты

Расположите на форме следующие компоненты

Расположите на форме следующие компоненты

Создать вывод подписей компонентов

Создать вывод подписей компонентов

Создать вывод подписей компонентов Label в зависимости от выбора параметра для расчета:
Например, Если в RadioGroup1 мы выбираем опцию напряжение, то значения
Label1, Label2, Label3, Label4, Label5, Label6
меняют свойство Caption соответственно на
Сила тока, Ампер, Сопротивление, Ом, Напряжение, Вольт

Следовательно событие выбора опции

Следовательно событие выбора опции

Следовательно событие выбора опции Напряжение опишем в окне кода

Самостоятельно запрограммировать выбор опций Сила тока и Сопротивление

Программируем кнопку Рассчитать

Программируем кнопку Рассчитать

Программируем кнопку Рассчитать

Если выбрана опция напряжение, то результатом будет произведение значений edit1 и edit2, т.е. используем формулу U=IR
Результат выведем на компонент Panel1

Программируем… Если выбран индекс в

Программируем… Если выбран индекс в

Если выбран индекс в RadioGroup1 =1

В свойство Caption компонента Panel1

Преобразуем текст из компонента edit1 в числовой вещественный тип

Преобразуем текст из компонента edit2 в числовой вещественный тип

Полученное число преобразуем в строку

Самостоятельно запрограммировать кнопку Рассчитать на расчет выбранных опций Сила тока и Сопротивление

Запустите приложение. Произведите отладку, если есть ошибки

Запустите приложение. Произведите отладку, если есть ошибки

Запустите приложение.
Произведите отладку, если есть ошибки.
Заполните таблицу, применив для расчетов созданную программу.

Источник: znanio.ru

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru