Создайте приложение, на форму которого помещены компоненты: button — 1 шт. label — 1 шт. edit — 2 шт. напишите обработчик события onclick компонента button, в котором происходит деление числа, записанного в первом компоненте edit, на число, записанное во втором. в компоненте label отображается результат этого отношения. в случае деления на ноль в компоненте label должно быть отображено соответствующее сообщение об ошибке.

263

403

Посмотреть ответы 3

Ответы на вопрос:

ChelovekNosok

Информатика

4,5(36 оценок)

Unit unit1; interface uses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; type tform1 = class(tform) button1: tbutton; edit1: tedit; edit2: tedit; label1: tlabel; procedure button1click(sender: tobject); private { private declarations } public { public declarations } end; var form1: tform1; implementation {$r *.dfm} procedure tform1.button1click(sender: tobject); begin try label1.caption: =floattostr(strtofloat(edit1.text)/strtofloat(edit2.text)); except on e : ezerodivide do showmessage('деление на 0 запрещено : '); end; end; end.

Nikol3001

Информатика

4,7(31 оценок)

Хоть бы язык ну, допустим, делфи: try label1.caption : = floattostr(strtofloat(edit1.text) / strtofloat(edit2.text)); except on edivbyzero do showmessage('devide by 0'); else showmessage('error'); end; edit1.text : = ''; edit2.text : = '';

ksenia20012002

Информатика

4,5(4 оценок)

Program gt; var n,q,s,k: integer; begin read(n); s: =0; k: =0; while n> 0 do begin q: =n mod 10; n: =n div 10; s: =s+q; k: =k+1; end; writeln(s,' ',k); end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.