Количество пикселей, полученное при сканировании = 12,7*12,7*1200*1200
Объем изображения =
12,7*12,7*1200*1200*16 бит = 12,7*12,7*1200*1200*16/8 байт =
12,7*12,7*1200*1200*2 байт = 12,7*12,7*1200*1200*2/1024 Кбайт =
453 628,125 Кбайт = 453628,125/1024 Мбайт ≈ 443 Мбайт
Коля тракторист, Саша комбайнёр, Петя - садовник.
Uses crt;
var
n,p:integer;
begin
writeln('Введите число: ');
readln(n);
p:=1;
while n>=10 do begin
p:=p*(n mod 100 div 10);
n:=n div 100;
end;
writeln('p = ',p);
end.
Пример:
Введите число:
236584
p = 96
Тоже поковырялся, решил первое
Паскаль есть, проверил - работает
вот третье решил, тоже проверил, тоже всё работает, НО только при условии что количество четных элементов массива совпадает с количеством нечетных