/* p4 - 80

Язык Turbo C 2.0
Основы программирования - 4
Ввод данных: 3 int
a - простые переменные
j - ввод данных
s () - функции
1 - 16k
*/
#include <conio.h>
#include <stdio.h>
s (int); /* сумма цифр */
main ()
{
int a, b, c, d, e;
int j, k, l;
printf ("Введите три целых числа: ");
scanf ("%i%i%i", &j, &k, &l);
/* 80.3.29.1. Даны три целых числа. Определить, сумма цифр которого из
них больше. Подсчет суммы цифр организовать через подпрограмму. */
a = s (j);
b = s (k);
c = s (l);
printf ("1. ");
if (a > b)
if (a > c)
printf ("Сумма цифр первого числа больше.\n");
else
printf ("Сумма цифр третьего числа больше.\n");
else
if (b > c)
printf ("Сумма цифр второго числа больше.\n");
else
printf ("Сумма цифр третьего числа больше.\n");
/* 82.1.30.2. Вычислить n-ый элемент арифметической прогрессии:
a1 = 1, a2 = 3, a3 = 5, ... . */
a = 1;
if (j > 1) a = 2 * j - 1;
printf ("2. %i-ый член арифметической прогрессии %i.\n", j, a);
/* 83.2.31.3. Просуммировать первые n членов геометрической прогрессии
a1 = 1, a2 = 2, a3 = 4, ...,
не пользуясь формулой для суммы первых n членов прогрессии. */
a = 1;
b = 0;
for (c = 0; c < j; c++)
{
b += a;
a *= 2;
}
printf ("3. Сумма %i членов геометрической прогрессии равна %i.\n", j, b);
/* 83.3.32.4. Вывести на печать первые n (n >= 3) чисел Фибоначчи.
Подсчитать, сколько среди них четных чисел. */
a = 1; /* первое число Фибоначчи */
b = 1; /* второе число Фибоначчи */
c = 0; /* число четных чисел в последовательности */
printf ("\n4. ");
for (d = 0; d < j; d++)
{
printf ("%i ", a);
if (a % 2 == 0) c++;
e = a + b;
a = b;
b = e;
}
printf ("\nЧисло четных чисел в последовательности - %i.\n", c);
getch ();
printf ("\n");
}
s (int a) /* сумма цифр */
{
int b = 0;
while (a)
{
b += a % 10;
a /= 10;
}
if (b < 0) b = -b;
return b;
}