На месте преступления было обнаружено 4 части бумаги. По результатам проверки установлено, что фрагменты IP-адреса являются фрагментами. Проверяющими эти части обозначены буквами А, Ә, Б и В. Восстановление IP-адреса. 64 А 2.16 Ә 16 Б 8.32 В
При измерении объемов информации есть определенные нюансы отличающие это измерение от привычных литров и килограммов. Так, чтобы зашифровать символ в популярной кодировке потребуется 8 сигналов (каждый из которых 1 или 0). Отдельно один этот сигнал будет называться бит. А одна такая последовательность, кодирующая один символ будет называться байт. Значит в 1 байте содержится 8 бит. Далее в каждой большей единице содержится 1024 меньшие единицы. Так, в 1 кб содержится 1024 байт= 8192 бит в 1 мб содержится 1024 кб = 1048576 байт = 8388608 бит в 1 гб содержится 1024 мб = 1048576 кб = 1073741824 байт = 8589934592 бит
s:=0; {s - это указанная тобой сумма. Мы ее соответственно обнуляем сначала}
for i:=1 to n do begin
if a[i] mod 10=0 then s:=s+a[i];
end;
{ берем каждый элемент массива, и проверяем, делится ли он на 10 без остатка(mod- это остаток от деления на указанное число). Если все в порядке, тогда прибавляем число к общей сумме }
Writeln('summa elementov ravnih nulu ',s); {пишет ответ}
readln; {чтобы сразу не закрывалась программа}
end.
Если возникнут вопросы или появится еще подобное задание для решения, пиши прямо в личку. Мне все равно делать нечего )
Далее в каждой большей единице содержится 1024 меньшие единицы.
Так,
в 1 кб содержится 1024 байт= 8192 бит
в 1 мб содержится 1024 кб = 1048576 байт = 8388608 бит
в 1 гб содержится 1024 мб = 1048576 кб = 1073741824 байт = 8589934592 бит
Язык Паскаль.
Program Ski;
const n=5; {длина массива}
var: a:array [1..n] of integer; i,s:integer;
begin
For i:=1 to n do begin
Writeln('vvedite element massiva nomer ',i);
Read(a[i]);
end; {Тут мы просим пользователя ввести элементы}
s:=0; {s - это указанная тобой сумма. Мы ее соответственно обнуляем сначала}
for i:=1 to n do begin
if a[i] mod 10=0 then s:=s+a[i];
end;
{ берем каждый элемент массива, и проверяем, делится ли он на 10 без остатка(mod- это остаток от деления на указанное число). Если все в порядке, тогда прибавляем число к общей сумме }
Writeln('summa elementov ravnih nulu ',s); {пишет ответ}
readln; {чтобы сразу не закрывалась программа}
end.
Если возникнут вопросы или появится еще подобное задание для решения, пиши прямо в личку. Мне все равно делать нечего )