Құрамды шарт деген не?
қарапайым шарттармен құрамды шарттардың қандай айырмашылықтары бар?
логикалық амалдардың қандай түрлері бар?
логикалық амалдардың қызметі қандай?
құрамды шарттарды жасауда логикалық амалдардың тәртібін түсіндіріңдер?
"ақиқат" жане "жалған" ұғымының құрамды шарттарға қандай байланыс бар? көмек керек 05.03.2020ға бал беремін
var
FileName, Ext: string;
i, p: Integer;
begin
Write ('Введите имя файла: ');
Read (FileName);
p := 0;
for i := Length (FileName) downto 1 do begin
if FileName [i] = '.' then begin
p := i;
Break;
end;
end;
if p = 0 then begin
WriteLn ('Не найдено расширение имени файла!');
Exit;
end;
Ext := LowerCase (Copy (FileName, p + 1, Length (FileName) - p));
if (Ext = 'htm') or (Ext = 'html') or (Ext = 'php') then
WriteLn ('Это веб - страница!')
else if (Ext = 'doc') or (Ext = 'docx') then
WriteLn ('Это документ Microsoft Word!')
else if (Ext = 'xls') or (Ext = 'xlsx') then
WriteLn ('Это документ Microsoft Excel!')
else if (Ext = 'zip') or (Ext = 'rar') or (Ext = '7z') then
WriteLn ('Это архив!')
else if Ext = 'exe' then
WriteLn ('Это программа!')
else
WriteLn ('Что - то другое.');
end.
Задача 1.
Информационный вес одного символа стандартного компьютерного алфавита из 256 символов = 8 бит или 1 байт, т.к. 256 = 2^8
512 = 2 * 2^8, т.е. вес одного символа алфавита из 512 символов будет 16 бит или 2 байта.
1024 * 16 = 16384 бита или 2048 байта.
Задача 2.
1/256 Мб = 1024/256 Кб = 4 Кб или 4096 байт
4096/4096 = 1
Каждый символ в сообщении весит 1 байт или 8 бит.
Мощность алфавита = 2^8 = 256 символов.
Задача 3.
8 Кб = 8192 байта
8192/2048 = 4 байта.
Каждый символ в сообщении весит 4 байта или 32 бит.
Мощность алфавита = 4 * 2^8 = 1024 символа.