Ответ: 48000000 Бит
Объяснение:
V=N*M*I //В задачи указано что нет градации серого цвета, значит изображение имеет палитру из 2 цветов [черный,белый], тогда глубина цвета будет равна 1 <N=2^I>
V=8000*6000=48000000 Бит
Var a: array[0..10] of integer;
i,n,sum: integer;
begin
sum:=1;
for i:=0 to 9 do
begin
writeln('Введите ',i+1,' число');
readln(n);
a[i]:=n;
if n<>0 then
begin
sum:=sum*a[i];
end;
end;
for i:=0 to 9 do
begin
if a[i]<>0 then writeln('Значения: ',a[i]);
end;
writeln('Произведение: ',sum);
end.
костя леша боря тимофей саша ефим
Var x1,y1,x2,y2,r:real;
begin
write('Введите x1,y1');read(x1,y1);
write('Введите x2,y2');read(x2,y2);
r:= sqrt(sqr(x2-x1) + sqr(y2-y1));
write('расстояние между двумя точками = ',r);
<span>end.</span>