программы MS Excel преобразовать кодовые таблицы ASCII, CP866, CP1251, КОИ8-Р к таблицам вида: в ячейки первого столбца таблиц записать в алфавитном поряд-ке заглавные, а затем строчные буквы латиницы и кириллицы, в ячейки второго столбца — соответствующие буквам коды в десятичной системе счисления, в ячейки третьего столбца — со-ответствующие буквам коды в шестнадцатеричной системе счисления. Значения кодов необходимо выбрать из соответству-ющих кодовых таблиц.
// Внимание! Если программа не работает, обновите версию!
function ДробьНесократима(Чис,Знам:integer):boolean;
begin
while Знам<>0 do begin Чис:=Чис mod Знам; Swap(Чис,Знам) end;
Result:=Чис=1
end;
begin
for var Знаменатель:=2 to 7 do
for var Числитель:=1 to Знаменатель-1 do
if ДробьНесократима(Числитель,Знаменатель) then
Write(Числитель,'/',Знаменатель,' ');
Writeln
end.
Результат
1/2 1/3 2/3 1/4 3/4 1/5 2/5 3/5 4/5 1/6 5/6 1/7 2/7 3/7 4/7 5/7 6/7
◘Достоверность информации. Ин-фа достоверна, если отражает истинное положение дел. (объективная информация всегда достоверна)
◘Полнота информации. Информация полная, если ее достаточно для понимания и принятия решения.
◘Точность информации. Определяется степенью ее близости к реальному состоянию объекта, процесса, явления и т.д.
◘Актуальность информации – важность для настоящего времени.
◘Полезность информации.
- Самая ценная информация – объективная, достоверная, полная, и актуальная.