Var x,y:integer;
begin
writeln('введите x');
readln(x);
y:=1/x;
writeln(y);
end.
если я правильно понял суть задания то так
<span>Задача 1. Получено сообщение, информационный объем которого равен 32 битам. чему равен этот объем в байтах? </span>
<span>Решение: В одном байте 8 бит. 32:8=4 </span>
Ответ: 4 байта.
<span>Задача 2. Объем информацинного сообщения 12582912 битов выразить в килобайтах и мегабайтах. </span>
<span>Решение: Поскольку 1Кбайт=1024 байт=1024*8 бит, то 12582912:(1024*8)=1536 Кбайт и </span>
<span>поскольку 1Мбайт=1024 Кбайт, то 1536:1024=1,5 Мбайт </span>
Ответ:1536Кбайт и 1,5Мбайт.
<span>Задача 3. Компьютер имеет оперативную память 512 Мб. Количество соответствующих этой величине бит больше:</span>
<span>1) 10 000 000 000бит 2) 8 000 000 000бит 3) 6 000 000 000бит 4) 4 000 000 000бит Решение: 512*1024*1024*8 бит=4294967296 бит. </span>
<span>Ответ: 4.</span>
↓5 →1 ↑2 →1 ↓2 →1 ↑5 ←1 ↓2 ←1 ↑2 ←1;
↓5 →1 ↑5 ←1;
↓3 →2 ↓2 →1 ↑5 ←1 ↓2 ←1 ↑2 ←1
Задача 4. Определить объем растрового изображения размером 200 х 200 и 256 цветами.Решение: 200 х 200 х 8 бит = 320 000 бит / 8 бит / 1024 байт = 39,0625 Кбайт ≈ 39 КбайтОтвет: 39 Кбайт
Движение объекта.Создание простой анимации в игровой среде.Объект будет двигаться постоянно,дойдя до края оттолкнется и обратнобудет двигаться