файл, имеющий размер 13 Кбайт, передают через некоторое соединение со скоростью 256 бит/с. Найди, какой размер файла (в байтах) можно передать за такое же время с другого канала связи, скорость которого равна 1024 бит/с. (В ответе укажи только число.)
алгоритм далек от совершенства, медленный, но считает правильно. Паскаль
Объяснение:
var
col: integer;
i, k: longint;
del: boolean;
function prost(a: longint): boolean;
var c: integer;
begin
prost := a >= 2;
for c := 2 to trunc(sqrt(a)) do if a mod c = 0 then prost := false;
end;
begin
i := 2;
col := 1;
repeat
del := (i mod 2 = 0) or (i mod 3 = 0) or (i mod 5 = 0);
for k := 6 to i div 2 do if (prost(k) = true) and (i mod k = 0) then del := false;
if del then
begin
Write(i, ', ');
inc(col);
end;
inc(i);
until col > 1000;
end.
◘Достоверность информации. Ин-фа достоверна, если отражает истинное положение дел. (объективная информация всегда достоверна)
◘Полнота информации. Информация полная, если ее достаточно для понимания и принятия решения.
◘Точность информации. Определяется степенью ее близости к реальному состоянию объекта, процесса, явления и т.д.
◘Актуальность информации – важность для настоящего времени.
◘Полезность информации.
- Самая ценная информация – объективная, достоверная, полная, и актуальная.