Составьте программу, дано количество информации в битах. вывести в удобной форме в более крупных единицах. (до мб). пример вывода: 10240 бит = 1280 байт = 1,25 кб = 0,0012 мб

213

479

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

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

vladawlada

Информатика

4,8(60 оценок)

Var n: integer; begin read(n); write(n,' бит = ', n/8, ' байт = ', n/8192: 0: 2,' кб = ',n/(8*sqr(1024)): 0: 4,' мб'); end. альтернативное решение: var n: integer; b, kb, mb: real; begin read(n); b : = n / 8; kb : = b / 1024; mb : = kb / 1024; write(n, ' бит = ', b: 0, ' байт = ', kb: 0: 2, ' кб = ', mb: 0: 4, ' мб'); end.

Ivan733822

Информатика

4,4(18 оценок)

1. белые грибы = x лисички = 10 + x подберёзовики = (x+(10+x))*2 всего: x+(10+x)+((x+(10+x))*2) 2. var x: real; begin writeln('введите кол-во белых грибов'); readln(x); writeln('всего: ',x+(10+x)+((x+(10+x))*2)); end.