function opkd(n: integer): integer;
var i,k: integer;
begin
k:=0;
for i:=1 to n do if n mod i=0 then k:=k+1;
opkd:=k;
end;
var n,i,k: integer;
begin
k:=0;
readln(n);
for i:=1 to n do if opkd(i) mod 2=0 then k:=k+1;
write(k);
end.
2048=2^11 1536 = 1,5*1024=1,5*2^10
F = 3*2048*1536 =
=3*1,5*2^10 *2^11 (байт) =4,5*2^11 Кбайт =4,5 *2 Мбайт =9 Мбайт
Кодирование информации имело огромную роль во время всех военных конфликтах в истории человечества. Кодирование информации при помощи азбуки Морзе помогает общаться там, где сказать что-то словами не представляется возможным.
Присутствуют операторы if, then, else. Значит ветвление
Ответ:б