-Перевести 41 943 040 бит в мегабайты -Перевести 4,5 мегабайта в биты
- Перевести 0,5 гигабайта в байты

Question

Информатика: -Перевести 41 943 040 бит в мегабайты -Перевести 4,5 мегабайта в биты - Перевести 0,5 гигабайта в байты

dover2 · Accepted Answer

Исходя из самого вопроса - тут не важно само выражение функции.

1. 7 { -6, -4, -2, 0, 2, 4, 6 }
Var k,n : Real;
Begin
n:=0;
k:=-6;
While k<=6 do
Begin
    k:=k+2;
    n:=n+1;
end;
Writeln('n = ',n);
end.

2. 7   { -2, -1.5, -1, -0.5, 0, 0.5, 1 }
Var k,n : Real;
Begin
n:=0;
k:=-2;
While k<=1 do
Begin
    k:=k+0.5;
    n:=n+1;
end;
Writeln('n = ',n);
end.

3. 3 { -3, -1, 1 }
Var k,n : Real;
Begin
n:=0;
k:=-3;
While k<=2 do
Begin
    k:=k+2;
    n:=n+1;
end;
Writeln('n = ',n);
end.

4. 7 { -1, -0.5, 0, 0.5, 1, 1.5, 2 }
Var k,n : Real;
Begin
n:=0;
k:=-1;
While k<=2 do
Begin
    k:=k+0.5;
    n:=n+1;
end;
Writeln('n = ',n);
end.

-Перевести 41 943 040 бит в мегабайты -Перевести 4,5 мегабайта в биты- Перевести 0,5 гигабайта в байты

MOGZ ответил

-Перевести 41 943 040 бит в мегабайты -Перевести 4,5 мегабайта в биты
- Перевести 0,5 гигабайта в байты