Множества - Pascal ABC

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

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

Состаить множество, состоящее из общих делителей двух чисел А и В .

Решение задачи: «Множества»

textual
Листинг программы
if i in m then Label1.Caption:=Label1.Caption+inttostr(i)+',';
end;

Объяснение кода листинга программы

В данном коде выполняется объединение элементов из двух множеств в третье. Список действий можно описать следующим образом:

  1. Проверка принадлежности элемента i множеству m.
  2. Если элемент i принадлежит множеству m, то выполняется следующее действие:
  3. Значение переменной Label1.Caption увеличивается на строковое представление числа i, за которым следует запятая и пробел.
  4. Код продолжается до тех пор, пока все элементы из множества m не будут обработаны.

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

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