1.Графика – бейнелеу өнерінің бір жанры. Кескіндеме жанрында түс пен бояу негізгі рөл атқарса, графикада (гр. graphein гр. grapho– жазамын) сызықтар, штрихтар, ашық және қара (қоңыр) дақтардың арақатынасы шешуші рөл атқарады, сондай-ақ заттардың ең негізгі белгілері таңдап алынады.
2.1)гылыми графика
2)конструкторлык графика
3)искерлик графика
4)суреттеу графикасы
5)жарнамалык графика
3.Әдетте, бұл жалғыз көп түсті нүкте. Бейнесызбалық объектілерді бейнелеу үшін қолданылады. Мысалы, дисплей бетіндегі әрбір әріп бірнеше нүктеден тұрады. Осы нүктелер бейне элементтері болып табылады. Әрбір құрастырылатын қатар осындай бірнеше пиксельден тұрады. Пиксельдің көрсетілуі немесе көрсетілмеуі бейнежадтың тиісті разрядының қалып-күйіне байланысты.
Var a: array[1..n] of integer; k, i, m: byte; min: integer;
begin Write('Razmer massiva: '); Readln(k); if (k < 0) or (k > 100) then begin Writeln('Razmer dolzhen byt bolshe 0 i menshe 100'); Readln; Exit; end; Randomize; Writeln('Ishodn. massiv: '); for i:=1 to k do begin a[i]:=Random(101)-50; write(a[i]:4); end; min:=a[1]; for i:=2 to k do if a[i] < min then begin min:=a[i]; m:=i; end; a[m] := a[1]; a[1] := min; Writeln; Writeln('Min element = ', min:4, ' v posicii ', m:3); Writeln('Rezult. massiv: '); for i:=1 to k do write(a[i]:4); readln; end.
1.Графика – бейнелеу өнерінің бір жанры. Кескіндеме жанрында түс пен бояу негізгі рөл атқарса, графикада (гр. graphein гр. grapho– жазамын) сызықтар, штрихтар, ашық және қара (қоңыр) дақтардың арақатынасы шешуші рөл атқарады, сондай-ақ заттардың ең негізгі белгілері таңдап алынады.
2.1)гылыми графика
2)конструкторлык графика
3)искерлик графика
4)суреттеу графикасы
5)жарнамалык графика
3.Әдетте, бұл жалғыз көп түсті нүкте. Бейнесызбалық объектілерді бейнелеу үшін қолданылады. Мысалы, дисплей бетіндегі әрбір әріп бірнеше нүктеден тұрады. Осы нүктелер бейне элементтері болып табылады. Әрбір құрастырылатын қатар осындай бірнеше пиксельден тұрады. Пиксельдің көрсетілуі немесе көрсетілмеуі бейнежадтың тиісті разрядының қалып-күйіне байланысты.
4.бул сурак суретте көрсетілген.
a: array[1..n] of integer;
k, i, m: byte;
min: integer;
begin
Write('Razmer massiva: ');
Readln(k);
if (k < 0) or (k > 100) then
begin
Writeln('Razmer dolzhen byt bolshe 0 i menshe 100');
Readln;
Exit;
end;
Randomize;
Writeln('Ishodn. massiv: ');
for i:=1 to k do
begin
a[i]:=Random(101)-50;
write(a[i]:4);
end;
min:=a[1];
for i:=2 to k do
if a[i] < min then
begin
min:=a[i];
m:=i;
end;
a[m] := a[1];
a[1] := min;
Writeln;
Writeln('Min element = ', min:4, ' v posicii ', m:3);
Writeln('Rezult. massiv: ');
for i:=1 to k do
write(a[i]:4);
readln;
end.