4 года назад

Помогите решить уравнение 512x байт = 1 Мбайт; 256x бит = 4Кбайт

1 ответ:

0 0

1) 512*x байт= 1 Мбайт
Переводим Мбайт в байты: 1 Мбайт=1024 Кбайт=1048576 байт⇒ x=1048576/512=2048
2)256*x бит= 4 Кбайт
Переводим Кбайт в биты: 4 Кбайт=4*1024*8=32768⇒x=32768/256=128

Читайте также

13. рассчитать таблицу значений y=24x³-17 для х=2,5,8,11,14. в паскале программу.

kutin

Вот так:
program lllll;
var y,i,x:integer;
begin
x:=2;
for i:=1 to 5 do
begin
y:=24*(x*x*x)-17;
x:=x+3;
writeln('y= ', y, ' при x=', x);
end;
end.

0 0

3 года назад

Помогиииитееее!!!!на паскале1.Найти сумму первых 10 натуральных нечетных чисел.2.Найти произведение натуральных чисел прекратить

gorsvet109 [50]

Var
a,b,c,d:integer;
begin
c:=1;
b:=0;
while a<>1 do begin
readln(a);
if a mod 2 <> 0 then begin
b:=b+1;
if b<=10 then c:=c+a;
end;
c:=c*a;
end;
writeln(b,' ',c);
end.

0 0

4 года назад

Соч по информатике за 2 четверть

igor-luce

Что именно, какое, вдруг там разные

0 0

4 года назад

Помогите, срочно, пожалуйста! Как люди получают информацию, недоступную их органам чувств? Что изучает информатика? Формы предст

ГалинаКр [1.6K]

Информатика - это наука, которая изучает законы, методы и способы накопления, хранения, обработки и передачи информации с помощью компьютеров и других технических средств. <span>по форме представления информация делится на письмо, звук, осязание, вкус и видео.</span>

0 0

4 года назад

Дана последовательность действительных чисел а1,а2,...,аn. Выяснить, быдет ли она возрастающей.

Тайгоня [171]

//Pascal ABC.NET v3.1 сборка 1219

Const
n=5;

Var
ar:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do
readln(ar[i]);
for i:=1 to n-1 do
if ar[i]>ar[i+1] then
begin
writeln('Убывает на одном из участков');
exit;
end;
writeln('Возрастает');
end.

0 0

4 года назад