Байт-8 бит
Килобайт-1024 байта
мегабайт-1024 килобайта
гигабайт-1024 мегабайта
это значит сколько весит ваши документы
Здравствуйте
(150, 200)
(130, 150)
(180, 210)
(200, 150)
Всего запусков будет 4
Объяснение:
все очень просто например возьмем правильный запуск
(150, 200)
x=150 y= 200 теперь подставляем в систему место y 200 а вместо x 150
теперь получается 200>=150 and 150<=200 получается что система выдаст да . В этом задание простой принцип подставлять числа которые даны место букв. При этом если одна часть не правильна например возьмем
(190, 140)
x=190 y=140 подставляем 140>=150 and 190<=200 .
140>=150 неверно
190<=200 верно но все ровно ответ выдается НЕТ т.к одна часть системы не равна
===== PascalABC.NET =====
begin
var СписокСлов := ReadlnString('Список слов через пробел:').ToWords;
var ИсходныйСловарь := new Dictionary<char, integer>;
var РабочийСловарь := new Dictionary<char, integer>;
foreach var Символ in ReadlnString('Слово:') do
ИсходныйСловарь[Символ] := ИсходныйСловарь.Get(Символ) + 1;
var СтрокаВывода: string;
foreach var Слово in СписокСлов do
begin
foreach var Символ in Слово do
РабочийСловарь[Символ] := РабочийСловарь.Get(Символ) + 1;
var МожноПостроитьСлово := True;
foreach var ЭлементРабочегоСловаря in РабочийСловарь do
begin
var Ключ := ЭлементРабочегоСловаря.Key;
var ПределПовторовБуквы: integer;
if ИсходныйСловарь.TryGetValue(Ключ, ПределПовторовБуквы) then
begin
if ЭлементРабочегоСловаря.Value > ПределПовторовБуквы then
begin
МожноПостроитьСлово := False;
break
end
end
else
begin
МожноПостроитьСлово := False;
break
end
end;
if МожноПостроитьСлово then
begin
if СтрокаВывода <> '' then
СтрокаВывода += ', ';
СтрокаВывода += Слово
end;
РабочийСловарь.Clear;
end;
Println(СтрокаВывода)
end.
Всё это единицы измерения количества информации.
Байт - 8 бит
Килобайт - 1024 байта
Мегабайт - 1024 килобайта
Гигабайт - 1024 мегабайта