Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
EricKornet
09.04.2020 16:30 •
Информатика
Lazarus створіть проект для віднімання двох дійсних чисел (real) создайте проект для вычитания двух действительных чисел (real)
Показать ответ
Ответ:
EdinorogDog
21.08.2020 09:54
Procedure TForm1.Button1Click(Sender: TObject);
var a, b, x :real;
begin
a := StrToFloat(Edit1.Text);
b := StrToFloat(Edit2.Text);
x := a - b;
Label1.Caption := FloatToStr(x);
end;
0,0
(0 оценок)
Популярные вопросы: Информатика
angelochekbobi
16.03.2020 03:46
Сколько различных однословных sms-ок длины не более пяти символов можно составить из букв ё к л м н если слово начинается и заканчивается гласной...
Aleksandra20061
16.03.2020 03:46
Гриша дал младшему брату деньги, научил пользоваться автоматом по продаже товаров и отправил купить упаковку натурального сока. пока младший брат дошел до автомата с соками, он...
Aldon15
14.08.2020 01:37
Составьте блок-схему перехода улицы по пешеходному переходу зебра...
PatrickKKK
13.08.2020 22:52
Вывести в столбик четные целые числа диапазона [а; в]...
malikamalik1406
03.10.2021 18:03
Моделью какого реального объекта можно назвать электрическую лампочку? ? 1) окно 2) стакан 3) воздушные шарики 4)...
ruskei
27.10.2021 04:45
Запишите внутреннее представление следующих десятичных чисел, используя 8-разрядную ячейку: 65 (10 система счисления) Заранее благодарен....
asadbekakramov
21.08.2022 12:21
Мәліметтер қоры құрылымына қарай нешеге бөлінеді?Дұрыс жауап саны: 14325...
ПолинаПадафет15
14.01.2021 15:50
3 D редакторларын қолдану амалдары неше бөліктен тұрады...
den4ik22855
13.10.2021 01:28
Ключики разберите слова как часть речи...
ilovemath777
13.10.2021 01:28
Как решить 2х+3у=5 5х+2у=-1 решите систему уравнениё рациональным...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a, b, x :real;
begin
a := StrToFloat(Edit1.Text);
b := StrToFloat(Edit2.Text);
x := a - b;
Label1.Caption := FloatToStr(x);
end;