Отметьте верные высказывания, которые будут, являться текстом или текстовой
информацией. Правильные варианты
ответов подчеркните.
1. Прочитанная басня Н.В. Крылова
«Лебедь, щука и рак».
2. Фотография в альбоме
3. Написанное вами сочинение.
4. Схема метрополитена г. Москва.
5. Мнение вашего друга по поводу
просмотренного фильма.
6. Просмотренная картина.
194
480
Ответы на вопрос:
Unit unit1; {$mode objfpc}{$h+} interface uses classes, sysutils, fileutil, forms, controls, graphics, dialogs, stdctrls, spin, math; type { tform1 } tform1 = class(tform) button1: tbutton; edit1: tedit; edit2: tedit; label1: tlabel; label2: tlabel; label3: tlabel; label4: tlabel; procedure button1click(sender: tobject); private { private declarations } public { public declarations } end; var form1: tform1; implementation {$r *.lfm} { tform1 } procedure tform1.button1click(sender: tobject); begin form1.label4.caption: =floattostr(tan((strtofloat(form1.edit1.text)*2)+strtofloat(form1.edit2.; end; end.
Популярно: Информатика
-
sayyoraibragim08.05.2020 01:55
-
ElisYesly12.07.2021 23:19
-
DYUK1s29.04.2022 10:35
-
Kirill442118.02.2023 19:06
-
Puma2005041213.02.2023 07:35
-
pumpus26.01.2023 22:47
-
valikkk103.07.2021 02:43
-
Portée08.03.2023 16:14
-
arzumirzeyeva07.06.2020 06:45
-
альона44в31123401.10.2021 23:51