1) 8гб это 8192 мб следовательно 8192:12= 682 фотографии
2)16384:320=48 клипов
3)5*30*70=10500 байт
4)256= 2^i=2^8следовательно i=8 битов
8*80*32=20480 битов
20480*2=40960 битов=5120 байт=5 килобайт
i - кол-во информации
^ - степень
Должно быть так. Программа работает,но я не уверена в точности на 100%.
А так,все работает без сбоев,результаты выдает верные.
Var
x:integer;
begin
Writeln('x = '); readln(x);
if (x <> 0) and (x <> 5)then Writeln('y = ', 2*x/(x*(x-5)):0:5)else
Writeln('No Solution Exist');
end.