1. Для чого використовується напие? 2. Як розмістити напис на формі?
?
5. Що визначають значення властивостей Top, Left, Name для напису
4. Що визначають значення властивостей Enabled i Visible для напису
5. Що визначають значення комплексної властивості Font для напису?
6. Чим відрізняється властивість Color для напису і для кнопки?
7. Чим відрізняються властивості Top i Left для напису і для форми?
8. Чим відрізняються властивості Height i width для напису і для
форми?
9. Як можна змінити текст у написі?

👇

Ответ:

Artem1143

24.10.2020

1. Напис - це компонент,який використовується для виведення текстових повідомлень.

2. Щоб розмістити напис на формі,потрібно підвести вказівник до кнопки TLabel на вкладці Standard вікна середовища Lazarus і двічі клацнути ліву кнопку миші. тям кнопки.

4.5.6 Властивості напису Top, Left, Name, Enabled, Visible, Font аналогічні відповідним властивостям кнопки.

Значення властивості Color напису визначає колір його фону.Змінення значення цієї властивості приводить до змінення кольору фону напису, як це відбувається для форми.

9. Якщо змінити текст у полі Caption,то відповідно до його довжини зміниться ширина напису.

Текст напису можна вводити і редагувати як у полі Caption,так і у вікні Редактору рядків.

8. На відміну від форми і кнопки,значення властивостей Height i Width для напису не можна змінити на вкладці Властивості або перетягуванням. Висота і ширина напису визначаються текстом,розташованим у цьому написі.

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

Открыть все ответы

Ответ:

2006otvet

24.10.2020

Компьютеры, телефоны, мониторы. Без этой техники уже трудно представить жизнь. Исследования учёных влияния компьютерных излучений на здоровье привели в волнение офтальмологов, косметологов, дерматологов и ортопедов. Доктора подтверждают снижение остроты зрения, увеличение веса, ускорение старения кожи лица

Исследования учёных

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

Кожа потеряла эластичность, щёки обвисли, лицо потеряло контур, заметных морщин стало больше, некоторые дамы обзавелись вторым подбородком.

Причина неприятностей – в электростатическом поле, которое создаётся вокруг экрана и сушит воздух. Ещё одна причина – микрочастицы, оседающие и загрязняющие лицо. Глаза краснеют, появляется раздражение и воспаление.

Последствия:

· иссушение кожных покровов;

· расширение и забитость пор;

· излишняя жирность кожи;

· глаза окружены морщинистой сеточкой;

· сухие веки;

· расширенные сосуды на щеках;

· появление второго подбородка;

· мимические морщины.

Исследователями предлагаются профилактические меры, предотвращающие влияние вредных излучений

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

Ответ:

Anastasia2416

24.10.2020

1) Program n1;
var n,i:integer;
t:array[1..100] of real;
a,b:real;
begin
readln(n);
readln(a);
readln(b);
for i:=1 to n do
begin
t[i]:=(b-a)/n;
write(t[i],' ');
end;
end.
2) Program n1;
var a:array[1..100] of integer;
n,i:integer;
k:real;
begin
read(n);
k:=0;
for i:=1 to n do
read(a[i]);
for i:=1 to n do
if a[i] mod 2 <> 0 then
k:=k+1;
writeln;
writeln('кол-во нечет. чисел равно ',k,'');
end.
6) Program n1;
var a:array[1..100] of real;
i,n:integer;
s,sr:real;
begin
read(n);
for i:=1 to n do
read(a[i]);
s:=0;
sr:=0;
for i:=1 to n do
s:=s+a[i];
sr:=s/n;
writeln('сред. арифметическое равно ',sr,'');
end.
7) Program n1;
var a:array[1..100] of real;
i,n:integer;
min,max:real;
begin
read(n);
for i:=1 to n do
read(a[i]);
min:=a[1];
for i:=2 to n do
if a[i]<min then
min:=a[i];
max:=a[1];
for i:=2 to n do
if a[i]>max then
max:=a[i];
writeln('максимальный элемент равен ',max,'');
writeln('минимальный элемент равен ',min,'');
end.
8) Program n1; var a:array[1..100] of real; i,n:integer; min,max,nom1,nom2:real; begin read(n); for i:=1 to n do read(a[i]); min:=a[1]; nom1:=1; for i:=2 to n do if a[i]<min then begin min:=a[i]; nom1:=i; end; max:=a[1]; nom2:=1; for i:=2 to n do if a[i]>max then begin max:=a[i]; nom2:=i; end; writeln('максимальный элемент равен ',max,', его номер ',nom2,''); writeln('минимальный элемент равен ',min,', его номер ',nom1,''); end.
9) Program n1; var a:array[1..100] of real; i,n:integer; min,max,s,sr:real; begin read(n); randomize; for i:=1 to n do begin a[i]:=random(100)+1; write(a[i],' '); end; writeln; s:=0; sr:=0; for i:=1 to n do s:=s+a[i]; sr:=s/n; writeln('ср. арифм. = ',sr,''); min:=a[1]; for i:=2 to n do if a[i]<min then min:=a[i]; max:=a[1]; for i:=2 to n do if a[i]>max then max:=a[i]; writeln('максимальный элемент равен ',max,''); writeln('минимальный элемент равен ',min,''); end.

4,6(91 оценок)

Это интересно:

Образование-и-коммуникации

18.11.2021

Как правильно раскладывать числа: краткое руководство для начинающих...

Кулинария-и-гостеприимство

11.05.2021

Простой и вкусный рецепт шоколадных конфет без лишнего хлопота...

Кулинария-и-гостеприимство

17.08.2021

Как заказать кофе в Макдональдсе: простое руководство для настоящих любителей кофе...

Компьютеры-и-электроника