Устройство вывода-это устройства для преобразования информации в форму, понятную человеку Монитор-устройство, предназначенное для воспроизведения видеосигнала и визуального отображения информации, полученной от компьютера. Принтер-это внешнее устройство компьютера, предназначенное для вывода текстовой или графической информации, хранящейся в компьютере, на твёрдый физический носитель. Дополнительные функции принтеров. Современные принтеры предоставляют множество дополнительных функций, которые не имеют прямого отношения к печати, но могут быть очень полезны. Одной из самых интересных функций является технология прямой печати Direct Print. Она позволяет исключить из процесса съемки-печати компьютер, т.е. фотография распечатывается на принтере либо сразу с камеры, либо с флэш-карты. . Такие устройства называются док-принтеры (Dock Printer
Const n=15; var a: array[1..n] of integer; i,k,l,c:integer; min,max:byte; begin randomize; for i:= 1 to n do begin a[i]:=random(-20,20); write(a[i]:4); end; writeln;
l:=0; k:=0; for i:= 1 to n do if a[i]<0 then l:=l+1 else if a[i]>0 then k:=k+1; if l>k then writeln('а) Отрицательных чисел больше чем положительных') else if k>l then writeln('а) Положительных чисел больше чем отрицательных') else writeln('а) Отрицательных и положительных чисел одинаково'); writeln; writeln('б) Поставить минимальный элемент на первое место и максимальный элемента массива на последнее'); writeln; min := 1; max := 1; for i:=2 to n do begin if a[i] < a[min] then min := i; if a[i] > a[max] then max := i; end; c:=a[1]; a[1]:=a[min]; a[min]:=c; c:=a[n]; a[n]:=a[max]; a[max]:=c; for i:= 1 to n do write(a[i]:4); writeln; writeln; writeln('в) Номера элементов с минимальным значением:'); for i:= 1 to n do if a[i]=a[1] then write(i,' '); // Минимальный элемент поставлен на первое место! writeln; end.
Пример (для элементов из диапазона [-10; 10]): 6 -6 6 -9 -9 -3 -7 9 -3 9 6 -8 7 -3 6 а) Отрицательных чисел больше чем положительных
б) Поставить минимальный элемент на первое место и максимальный элемента массива на последнее
Монитор-устройство, предназначенное для воспроизведения видеосигнала и визуального отображения информации, полученной от компьютера.
Принтер-это внешнее устройство компьютера, предназначенное для вывода текстовой или графической информации, хранящейся в компьютере, на твёрдый физический носитель.
Дополнительные функции принтеров.
Современные принтеры предоставляют множество дополнительных функций, которые не имеют прямого отношения к печати, но могут быть очень полезны. Одной из самых интересных функций является технология прямой печати Direct Print. Она позволяет исключить из процесса съемки-печати компьютер, т.е. фотография распечатывается на принтере либо сразу с камеры, либо с флэш-карты. . Такие устройства называются док-принтеры (Dock Printer
var a: array[1..n] of integer;
i,k,l,c:integer;
min,max:byte;
begin
randomize;
for i:= 1 to n do
begin
a[i]:=random(-20,20);
write(a[i]:4);
end;
writeln;
l:=0; k:=0;
for i:= 1 to n do
if a[i]<0 then l:=l+1
else if a[i]>0 then k:=k+1;
if l>k then writeln('а) Отрицательных чисел больше чем положительных')
else if k>l then writeln('а) Положительных чисел больше чем отрицательных')
else writeln('а) Отрицательных и положительных чисел одинаково');
writeln;
writeln('б) Поставить минимальный элемент на первое место и максимальный элемента массива на последнее');
writeln;
min := 1; max := 1;
for i:=2 to n do begin
if a[i] < a[min] then min := i;
if a[i] > a[max] then max := i;
end;
c:=a[1]; a[1]:=a[min]; a[min]:=c;
c:=a[n]; a[n]:=a[max]; a[max]:=c;
for i:= 1 to n do write(a[i]:4);
writeln;
writeln;
writeln('в) Номера элементов с минимальным значением:');
for i:= 1 to n do
if a[i]=a[1] then write(i,' '); // Минимальный элемент поставлен на первое место!
writeln;
end.
Пример (для элементов из диапазона [-10; 10]):
6 -6 6 -9 -9 -3 -7 9 -3 9 6 -8 7 -3 6
а) Отрицательных чисел больше чем положительных
б) Поставить минимальный элемент на первое место и максимальный элемента массива на последнее
-9 -6 6 6 -9 -3 -7 6 -3 9 6 -8 7 -3 9
в) Номера элементов с минимальным значением:
1 5