Const n=10; var a:array[1..n] of integer; i,s,min:integer; begin writeln('Исходный массив:'); for i:=1 to n do begin a[i]:=random(21)-10; write(a[i]:4); end; writeln; s:=0; min:=a[1]; for i:=1 to n do begin if a[i]>0 then s:=s+a[i]; if a[i]<min then min:=a[i]; end; writeln('s = ',s,' min = ',min); for i:=1 to n do if a[i]>0 then a[i]:=s else if a[i]<0 then a[i]:=a[i]-min; writeln('Измененный массив:'); for i:=1 to n do write(a[i]:4); writeln; end.
Задание 1. 1) Разрешение 80 dpi показывает, что на каждый дюйм изображения приходится 80 точек. Следовательно, размеры изображения в дюймах составят 320/80 × 640/80 = 4х8 дюймов. 2) Общее количество пикселей составит 320×640 = 204800. Для хранения одного пикселя в палитре из 256=2⁸ цветов потребуется 8 бит = 1 байт. Тогда для хранения всего изображения потребуется 204800×1 = 204800 байт = 204800/1024 = 200 Кбайт
Задание 2. Высказывание совершенно правильное. Чем больше точек будет содержать каждый дюйм (или сантиметр, миллиметр..) изображения, тем оно будет более подробным, т.е. качественнее. Разница между «качеством изображения» и «качеством отображения изображения на экране монитора» может быть, а может и не быть - все зависит от того, в какой ситуации рассматривается эта фраза. Если мы говорим любую из этих фраз, оценивая картинку на мониторе, то разницы нет, потому что мы описываем то, что видим. Если же мы под «качеством изображения» имеем в виду разрешение того или иного отображения картинки, т.е. количество дюймов (сантиметров, миллиметров...) которые устройство может отображать, то для монитора оно не превышает 92 dpi, а для принтера составляет минимум 300 dpi, т.е. при одинаковом размере изображения качество напечатанной на принтере картинки более чем втрое выше, чем её отображение на мониторе.
Если я правильно понял, то числа массива от - 10 до 10.
var i,k:integer;
a:array [1..20] of integer;
begin
randomize;
k:=0;
write('Массив:');
for i:=1 to 15 do
begin
a[i]:=random(21)-10;
if a[i]>2 then k:=k+1;
write(a[i], ' ') +;
end;
writeln('Количество чисел = ', k);
end.