название системы счисления используемые числа
унарная 1
двоичная 0, 1
троичная 0, 1, 2
четверичная 0, 1, 2, 3
пятеричная 0, 1, 2, 3, 4
шестеричная 0, 1, 2, 3, 4, 5
в компьютере используют еще
восьмеричную 0, 1, 2, 3, 4, 5, 6,7
шестнадцатеричную 0, 1, 2, 3, 4, 5, 6, 7,8, 9 и буквы
A(10), B(11), C(12), D(13), E(14), F(15)
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём;
ПЕР
ф1, ф2: РЯД 50 ИЗ ЗНАК;
УКАЗ
Вывод.Цепь("Введите первую фамилию: ");
Приём.Строка(ф1);
Вывод.Цепь("^Введите вторую фамилию: ");
Приём.Строка(ф2);
ЕСЛИ ДЛИНА(ф1) > ДЛИНА(ф2) ТО
Вывод.Цепь('Фамилия "');
Вывод.Цепь(ф1);
Вывод.Цепь('" имеет больше символов, чем "');
Вывод.Цепь(ф2);
Вывод.Цепь('".')
АЕСЛИ ДЛИНА(ф1) < ДЛИНА(ф2) ТО
Вывод.Цепь('Фамилия "');
Вывод.Цепь(ф2);
Вывод.Цепь('" имеет больше символов, чем "');
Вывод.Цепь(ф1);
Вывод.Цепь('".')
ИНАЧЕ
Вывод.Цепь("Фамилии одинаковой длины.")
КОН
КОН Задание.