(512*1024/(640*480))*2 = 3.4 - Три страницы экрана при палитре из 16-ти цветов
(512*1024/(640*480)) =1.7 - Одна страница экрана при палитре из 256 цветов
Begin
var x,y:real;
read (x);
if (x>=0) and (x<=9) then
begin
while (y<>x) do
begin
read (y);
if (y<>x)then writeln ('Мимо') else writeln ('Попал');
end;
end else writeln ('Неверный ввод');
end.
Var x:real; f:real; begin writeln('Введите значение х '); readln(x); if x < 3 then f:= 1/(x*x*x - 6) else f:= -(x*x) +3*x +9; write('Знание х = ', x, ' Функция равна ', f);<span> end.</span>
<h2>Пример (A = 0, B = 1)</h2>
(false && true) || (false || -true) = false || (false || false) = <u>false</u>
<span>Если считать, исходя из условия задачи, что всё плохо, используется самая низкая стандартная частота дискретизации 8 Гц и данные имеют 8 битовый формат, при этом звук моно, и учесть, что в 1 Кб содержится 1024 байт, то для несжатого формата wav эта запись будет иметь длительность чуть более 83 секунд</span>