Дан Одномерный Целочисленный размером n.Вывести количество чисел кратных 7 и оканчивающихся на один. Программа - Pascal(9 класс) Очень благодарен!

Значит просто расписать как это должно работать?

Объявляем переменную День, которая будет считывать количество дней.

Вводится H хлеба - общее количество и Z - количество, которое потребляется в день.

Переведем кг в г, чтобы легче было считать: H = H * 1000

Запускается цикл пока H > 0(пока хлеб вообще имеется)

один проход цикла - один день, значит в теле цикла H = H - Z

То есть мы вычитаем из общего кг хлеба суточное потребление.

И увеличиваем переменую День на 1.

После этого цикла выводим переменную День.

Приведу пример на языке с++. В случае ввода H = 1, Z = 50, выводится ответ 20 дней

#include <iostream>

#include <cstdlib>

using namespace std;

int main()

{

int day = 0, Z, N;

cin >> N >> Z;

N = N * 1000;

while(N > 0){

 N = N - Z;

 day++;

}

cout << day << endl;

system("pause");

return 0;

}

Код на C++:

#include <iostream>

#include <ctime>

using namespace std;

int main()

{

   setlocale(LC_ALL, "rus");

   srand(time(NULL));

   int rows = 30;

   int chairs = 0;

   for (int i = 1, count_of_chairs = 20; i <= 30; i++, count_of_chairs += 2)

   {

       chairs += count_of_chairs;

   }

   cout << chairs << endl;

   return 0;

};

Код на Python:

rows = 30

chairs = 0

count_of_chairs = 20

for i in range(1, 31, 1):

   chairs += count_of_chairs

   count_of_chairs += 2

print(chairs)

Объяснение: