Question

схемы

1. Найти сумму элементов в цепочке с точностью до 0,001

 

     Ответ:

S = 1,157



Конечный условный цикл



2. Введите натуральное число и определите правильность суммы цифр в этом числе 10.

   Пример:

     Введите число> = 0:> = 0 Введите число:

     -234 1233

     Вы должны ввести положительное число. нет

     Введите число> = 0:

     1234

     да

Оператор выбора

3. Введите номер месяца и номер дня, определите количество дней, оставшихся до Нового года.

Например:

Введите номер месяца

12

Введите дату

25

До Нового года осталось 6 дней

помогите по заданиям составить программу для a, b, c pascal!
Даю 40 баллов​