Решить задачу средствами языка PASCAL. Дано некоторое целое двузначное число. Проверить, равна ли сумма его цифр числу 15.

На первом этапе был составлен алгоритм.

Идея решения задачи заключается в следующем: вводится двузначное число, определяются цифры, стоящие в позициях единиц и десятков (с помощью операций целочисленного деления div и mod).

Далее вычисляется сумма полученных цифр и проверяется условие, равна ли данная сумма числу 15.

Если равна, то выводим на печать сообщение =15, в противном случае печатаем сообщение не равна 15.

Блок-схема алгоритма