var n, m, max, k, i: integer; ar: array of integer;
function CountOfDel(n: integer): integer; var i, k: integer; begin if n>0 then begin for i := 1 to n do if n mod i = 0 then inc(k); end else for i:= n to -1 do if n mod i = 0 then inc(k); CountofDel := k; if n=0 then CountofDel:=0; end;
begin readln(n, m); k := 0; max := 0; for i := n to m do begin if CountOfDel(i)=0 then begin writeln('0'); exit; end; if CountOfDel(i) > max then begin k := 1; setlength(ar, k); ar[k - 1] := i; max := CountOfDel(i); end else if CountOfDel(i) = max then begin inc(k); setlength(ar, k); ar[k - 1] := i; end; end; for i := 0 to k - 1 do write(ar[i]:4); end.
Сочетание Ctrl + --> это прыжок на начало следующего слова. Сочетание Ctrl + Del это удалить часть слова от курсора до пробела. Если курсор стоит перед 1 буквой - удалится всё слово. 1) Нажимаем 2 раза Ctrl + --> и попадаем на скобку "(". 2) Нажимаем 6 раз Ctrl + Del и удаляем: скобку "(", 4 слова в скобках, и скобку ")". 3) Получили "словможно". Теперь нужно нажать пробел, чтобы разделить слова: "слов можно" ответ: 3) 1 клавишу и 8 сочетаний. Как вы за компьютером работаете, если MS Word не знаете?
700*8=5600 (бит)
5600/2800=2 бита
2^2= 4
ответ: 4