Прыгало высоко кенгуру.
Бежал быстро гепард.
(звучит не очень красиво, но по схеме)
1875 кбайт * 1024 * 8 = 15 360 000 бит
800 * 600 * (ln(256)/ln(2)) = 3840000 бит
15360000 / 3840000 = 4 страницы
Скорее всего Г: визуальная-зрение,аудиальная-слух,и тд...
<span>1) 1 Кбайт = 1024 байт = 8192 бит
2) 0.1083984375 Кбайт = 111 байт = 888 бит
3) 2 Кбайт = 2048 байт = 16384 бит</span>
Var s:integer;
begin
write('Стоимость покупки = '); readln(s);
if s>1000
then writeln('Скидка 5% (',s*0.05,' руб.), необходимо заплатить ',s*0.95)
else if s>500
then writeln('Скидка 3% (',s*0.03,' руб.), необходимо заплатить ',s*0.97)
else writeln('Скидки нет');
end.
Пример:
Стоимость покупки = 600
Скидка 3% (18 руб.), необходимо заплатить 582