Добавить в программу проверку числа - Pascal ABC

Узнай цену своей работы

Формулировка задачи:

Вот сама программа, нужно сделать так, чтобы, например, при вводе числа 19 в 9й СС выкидывало из программы (exit).

Решение задачи: «Добавить в программу проверку числа»

textual
Листинг программы
  writeln('Введите число в соответствии с CC:');
  readln(TD);
  for cs2 := 1 to length(TD) do if not (ord(TD[cs2]) - ord('0') in [0..cs1]) then exit;
  {...}

Оцени полезность:

14   голосов , оценка 4.143 из 5
Похожие ответы