const n=20;
var a:array [1..n] of integer;
i,max,maxi,min,mini:integer;
begin
write('Массив: ');
for i:= 1 to n do
begin
a[i]:=random(101)+50;
write (a[i],' ')
end;
max:=a[1];
maxi:=1;
min:=a[1];
mini:=1;
for i:= 1 to n do
begin
if a[i]>max then
begin
max:=a[i];
maxi:=i
end;
if a[i]<min then
begin
min:=a[i];
mini:=i
end
end;
writeln;
writeln('Максимальный элемент ',max,' и его номер ',maxi);
writeln('Минимальный элемент ',min,' и его номер ',mini)
end.
Или (если max или min элемент будет не один)
const n=20;
var a:array [1..n] of integer;
i,max,min:integer;
begin
write('Массив: ');
for i:= 1 to n do
begin
a[i]:=random(101)+50;
write (a[i],' ')
end;
max:=a[1];
min:=a[1];
for i:= 1 to n do
begin
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i]
end;
writeln;
for i:= 1 to n do
begin
if a[i]=max then writeln('Максимальный элемент ',max,' и его номер ',i);
if a[i]=min then writeln('Минимальный элемент ',min,' и его номер ',i)
end
end.
Форма — це звичайне вікно. Тому його розмір можна змінити точно так, як і розмір будь-якого іншого вікна, тобто захопленням і переміщенням (за до миші) межі. Після закінчення переміщення меж автоматично зміняться значення властивостей Height і Width.
Основні властивості
Name
(внизу пояснення до властивостей)
Ім'я компонента. Використовується в програмі для доступу до компоненту і його властивостей..
Caption
Текст на кнопці.
Left
Відстань від лівої межі кнопки до лівої межі форми.
Top
Відстань від верхньої межі кнопки до верхньої межі форми.
Width, Height
Ширина, висота кнопки
А) 3
Б)3
С) 8
D)4
E)вроде ниразу
F) 2
Объяснение:
я не уверена, но вроде так