Var
simple: array[1..10000] of integer;
i, j, a, b, simple_n, s: integer;
is_simple: boolean;

begin
read(a, b);

for i := 2 to b do begin
 is_simple := true;
 for j := 1 to simple_n do
 is_simple := is_simple and (i mod simple[j] <> 0);
 if is_simple then begin
 simple_n := simple_n + 1;
 simple[simple_n] := i;
 writeln(i);
 if i >= a then s := s + i;
 end;
end;

writeln(s);
end.

0 0

4 года назад

Файл размером 4096 байт передаётся через некоторое соединение со скоростью 512 бит в секунду.Определите размер файла (в кбайтах)

Александр389555

16,4 ответ в килобайтах

0 0

4 года назад

Для обработки входящих сообщений электронной почты служит Выберите один ответ: ftp-протокол SMTP-протокол POP3-протокол

Люси21

Pop3 так как это стандартный интернет-протокол прикладного уровня, используемый клиентами электронной почты для обработки входящих сообщений

0 0

2 года назад