В первый день строительства Колизея работал один рабочий и уложил 100 камней. Каждый последующий день рабочих становилось больше на один и каждый приносил на 1 камень больше, чем предыдущий. Через сколько дней был построен Колизей, если для его постройки нужно х камней Сделать в паскале с репитом!!!!!

16 Окт 2019 в 07:45
155 +1
0
Ответы
1

Программа на Pascal:

program ColosseumConstruction;
var
totalStones, stonesNeeded, stonesPerDay, day, workers: integer;
begin
totalStones := 0;
stonesNeeded := 100; // кол-во камней для постройки
stonesPerDay := 1; // начальное кол-во камней, которое укладывает рабочий
day := 1;
workers := 1; // начальное кол-во рабочих
repeat
totalStones := totalStones + workers * stonesPerDay;
if totalStones >= stonesNeeded then
break;
workers := workers + 1;
stonesPerDay := stonesPerDay + 1;
day := day + 1;
until totalStones >= stonesNeeded;
writeln('Колизей был построен за ', day, ' дней');
end.

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

19 Апр 2024 в 10:56
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир