Л.Р. №1 - Перевірка символів вхідного повідомлення на приналежність алфавіту
ПСЕВДОКОД:
bool check_number (string str, int oss) {
string alf = '01234567890ABCDEF'
int n = strlen(str)
bool flag
FOR (i := 1; i <= n; i++) {
flag := FALSE
FOR (j := 1; j <= oss; j++) {
IF (str(i) = alf(j)) THEN
flag := TRUE
BREAKE
}
IF (flag = FALSE) THEN -- we didn't find symbol in alphabet
BREAKE
}
RETURN flag
}
main {
string s:= '107QA'
IF (check_str(s, 16) = FALSE) THEN
echo 'ERROR!!!'
ELSE
echo 'OK!!!'
-- check_str('1110001101', 2) -- check number for 2 number system
-- check_str('3740', 8) -- check number for 8 number system
-- check_str('3F', 16) -- check number for 16 number system
}