Uses Crt;
const n=10;
var
A: array[1..n] of integer;
i,f,f1: integer;
begin
clrscr;
f:=-1;
f1:=-1;
for i:=1 to n do
begin
writeln('введите',i,' элемент массива ');
readln (A[i]);
if A[i]>0 then
begin
f1:=A[i];
if f<0 then
f:=A[i];
if f>f1 then
f:=A[i];
end;
end;
writeln('наименьшее положительное', f);
readln;
end.
Сходства:
Одинаковый размер (диаметр 120 мм, толщина 1.6 мм), имеет тот же радужный вид. Лазерный принцип записи.
Различия:
CD-диск использует инфрокрасный лазер (длина волны в возухе 780 нм), а DVD-диск использует красный лазер (650 нм) (меньшая длина волны позволяет более плотнее размещать информацию на DVD-дисках).
Ёмкость DVD (4.7 ГБ) сильно различается от ёмкости CD (700 МБ)