Регистрация
Kika228322
26.05.2023 14:56
Информатика
Есть ответ 👍

Pascal перевести байты в килобайты

149
286
Посмотреть ответы 2

Ответы на вопрос:

ezdinaa
ezdinaa
4,7(60 оценок)

программа:

var b: integer;

begin

write('байты: ');

readln(b);

writeln(b,' байт(а/ов) = ',b/1024: 5: 2,' кбайт');

end.

пример:

байты: 2048

2048 байт(а/ов) =   2.00 кбайт

nata121114
nata121114
4,5(37 оценок)

Решайте систему из двух уравнений:

16X*2*1024+X(768*1024*Y)=2097152

16X+X=272

из второго следует, что X=16, подставьте в первое и выразите Y - количесто цветов. Надеюсь

Популярно: Информатика