1)
Begin
var a,b:integer;
WriteLN('Введите градус: ');
ReadLN(a);
if a > 600 then begin
WriteLN('Пожарная ситуация')
end;
if b < 600 then begin
WriteLN('Рабочая ситуация')
end;
end.
2)
Begin var a:integer;
WriteLN('Введите номер дня недели: ');
ReadLN(a);
if a = 1 then begin
WriteLN('Понедельник-Количество уроков: 6')
end;
if a = 2 then begin
WriteLN('Вторник-Количество уроков: 6')
end;
if a = 3 then begin
WriteLN('Среда-Количество уроков: 6')
end;
if a = 4 then begin
WriteLN('Четверг-Количество уроков: 6')
end;
if a = 5 then begin
WriteLN('Пятница-Количество уроков: 6')
end;
if a = 6 then begin
WriteLN('Суббота-Количество уроков: 6')
end;
end.
Да с: с: с: с: с: с: с: с: с: с:
Танграм - это головоломка, состоящяя из фигур, для образования более сложной фигуры
Ответ:
Объяснение:
Меняем К на О и наоборот и т.д., буквы которых нет в ключе не меняем
Ф.К.Л.М.Ш.Я.З.Л.К.В.Ш.Б.З.Е
Ф.О.Р.М.А. Т.И.Р.О.В.А.Н.И.Е
1) Ищем ближайшую сверху к 48 степень двойки - это 2^6 = 64, то есть каждого спортсмена можно закодировать минимум 6 битами. Половина спортсменом это 48/2 = 24, и если на каждого из них надо по 6 бит, то необходимый объем памяти: 24*6 = 144 бита
2) Ближайшая к 15 степень двойки это 2^4 = 16, значит по 4 бита на номер. Для 40 номеров нужно 4*40 = 160 бит
3) Всего в алфавите 5 символов, ближайшая к 5 степень двойки это 2^3 = 8, значит по 3 бита на символ. Каждый пароль кодируется 11*3 = 33 битами. А для хранения 33 бит нужно 33/8 = 4.125 байт, округляем до 5 байт (по условию). Значит на 20 паролей нужно 20*5 = 100 байт.