15. в некоторой стране автомобильный номер длиной 6 символов составляют из заглавных букв (задействовано - id439977820210205 от r8n73x9999 05.02.2021 04:47

Question

Информатика: 15. в некоторой стране автомобильный номер длиной 6 символов составляют из заглавных букв (задействовано 30 различных букв) и десятичных цифр в любом порядке. каждый такой номер в компьютерной программе записывается минимально возможным и одинаковым целым количеством байт (при этом используют посимвольное кодирование и все символы кодируются одинаковым и минимально возможным количеством бит). определите объем памяти в байтах, отводимый этой программой для записи 50 номеров , с дано и с решение .

r8n73x9999 · Accepted Answer

1. Для цикла For есть решение выложенное выше от Srzontmp.

2. Почти ничего не меня получим код для цикла while:
var
i, n, k: integer;
begin
i := 2;
readln(n);
while i <= n div 2 do begin
    if (n mod i) = 0 then k := i;
    i:=i+1;
    end;
writeln('наибольший делитель ', n, ' = ', k);
end.

3. Аналогично для цикла Repeat:
var
i, n, k: integer;
begin
i := 2;
readln(n);
repeat
    if (n mod i) = 0 then k := i;
    i:=i+1;
until i> n div 2;
writeln('наибольший делитель ', n, ' = ', k);
end.

MOGZ ответил