Условие задачи
Решить задачу средствами языка PASCAL.
Дано некоторое целое двузначное число. Проверить, равна ли сумма его цифр числу 15.
Ответ
На первом этапе был составлен алгоритм.
Идея решения задачи заключается в следующем: вводится двузначное число, определяются цифры, стоящие в позициях единиц и десятков (с помощью операций целочисленного деления div и mod).
Далее вычисляется сумма полученных цифр и проверяется условие, равна ли данная сумма числу 15.
Если равна, то выводим на печать сообщение =15, в противном случае печатаем сообщение не равна 15.
Блок-схема алгоритма