Есть какая-либо сумма денег, тратим так, что вся сумма сразу не расходится, до тех пор пока пока не станет равно нулю. Нужно написать программу и вывести на экран кол-во покупок. Каждая вещь стоит по-разному.
Написать программу с рекурсии

Var  
   day,                      //номер дня 
   day_dist,              //дистанция пройденная в этот день в метрах 
   sum_dist :integer;//дистанция пройденная за все дни 
Begin 
   day_dist:=3000;   //за первый день пробежал 3000 м. 
   sum_dist:=3000;  //общая дистанция тоже 3000 м. 

//Найти ответ можно тремя
//Вариант 1. цикл for
{
   for day:=2 to 15 do begin      //считаем со 2 по 15 день   
      day_dist:= day_dist + 200;//дневная дистанция увеличивается на 200 м. 
      sum_dist:= sum_dist + day_dist;//общая дистанция увеличивается на 
                                                            дистанцию пройденную за день 
   end; 
} 

//Вариант 2. цикл while  
{ 
   day:=1;                                              //первый день посчитан 
   while day < 15 do begin                  //пока не настал 15 день считаем   
      day := day +1;                                //увеличиваем номер дня   
      day_dist:= day_dist + 200;           //увеличиваем дневную дистанцию   
      sum_dist:= sum_dist + day_dist; //увеличиваем общую дистанцию 
   end; 
} 
//Вариант 3. цикл repeat until  
{ 
   day:=1;                                               //первый день посчитан 
   repeat                                              //начинаем считать следующие   
      day := day +1;                                //увеличиваем номер дня   
      day_dist:= day_dist + 200;          //увеличиваем дневную дистанцию   
      sum_dist:= sum_dist + day_dist; //увеличиваем общую дистанцию 
   until day = 15;                                   //если настал 15 день перестаем считать 
} 
   writeln('В 15 день пройдено ', day_dist,'метров.');  //вывод результатов
   writeln('За 15 дней пройдено ', sum_dist,'метров.');
end.

Выражение будет записано так pow(x,2)+abs(x*y)-7(необходимо подключить библиотеку с мат. функциями - math.h)
Пример программы:
#include "stdafx.h"
#include <stdlib.h>//стандартная библиотека
#include <locale.h>//необходимо для установки русского языка
#include <iostream>//потоковый ввод/вывод
#include <math.h>//заголовочный файл с математическими функциями
                                                                                           нужен обязательно
using namespace std;//пространство имен
int main()
{
   setlocale(0,"russian");//русификация
   double x,y;
   printf("Введите X: ");
   cin >> x;
   cout << "Введите Y: ";
   cin >> y;
   cout << "Результат: " << pow(x,2)+abs(x*y)-7 << "\n";
   system("pause");//пауза
   return 0;
}