Регистрация
elizabetas326
09.06.2022 04:44
Информатика
Есть ответ 👍

6кб 500байт 3000бит перевести в байты

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

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

Sanyaaa12
Sanyaaa12
4,8(64 оценок)
3000 бит = 375 байт 500 байт = 500 байт 6кб = 6144 байт все суммируем и получаем 7019 байт  
pierrotsadclown
pierrotsadclown
4,8(32 оценок)
//pascal //заполнение массива случайными числами var   a: array[1..255] of integer;   i, sum, n: integer; begin write('введите n: '); readln(n); randomize; //в pascalabc.net можно убрать for i : = 1 to n do begin   a[i] : = random(21)-10; //случайные числа от -10 до 10   if ((a[i] mod 2 < > 0) and (a[i] < 0)) then sum : = sum + a[i];   write(a[i], ' '); end; writeln; writeln('сумма отрицательных и нечетных = ', sum); readln; end.  //pascal //заполнение массива с клавиатуры var   a: array[1..255] of integer;   i, sum, n: integer; begin write('введите n: '); readln(n); for i : = 1 to n do begin   write('a[', i, '] = '); readln(a[i]);   if ((a[i] mod 2 < > 0) and (a[i] < 0)) then sum : = sum + a[i]; end; writeln; writeln('сумма отрицательных и нечетных = ', sum); readln; end. 

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