1. Размер фото 6*8= 54 см кв
2. 54*900= 48600 точек
3. 48600*3= 145 800 бит = 18225 байт
1) 20*8 = 160 бит
2) 0,5*1024*1024*8 = 4 194 304 бит
3) 25*1024*8 = 204 800 бит
4) 256*8 = 2048 бит
1) 128/1024 = 0,125 кб
2) 5*1024 = 5120 кб
В поисковике забей открой с 1 по 3 сайт
var
m : array [1..10] of Integer;
i : Integer;
begin
Writeln('Введите массив: ');
for i := 1 to 10 do
begin
Write('m[', i, '] = '); Readln(m[i]);
end;
Writeln('Отрицательные: ');
for i := 1 to 10 do
if m[i] < 0 then Writeln(m[i]);
end.
Как-то так... )))
Смотри картинки...
Первая - вид формул, вторая - значения...