Предмет: Информатика, автор: вавам325423

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


Disaczar: то есть во второй день был уложен 101 камень, а в третий - 102?
вавам325423: нет,1-ый день 100камней, а 2-ой 201камень
Disaczar: 100, 201,302,403, так?
вавам325423: да
вавам325423: у меня есть один вариант, но что-то не так uses crt;
var a,b,x,v,k:real;
begin
readln (x);
a:=1;
b:=100;
k:=1;
Repeat v:=b+b UNTIL v=x;
Inc(k);
writeln ('понадобится',k,'дней');
end.

Ответы

Автор ответа: Disaczar
0
Var num, days, stones: integer;Beginwriteln('количество камней');readln(stones);num := 100;days := 0;repeatdays := days + 1;stones := stones - num;num := num + 101;until stones <= 0;writeln ('понадобится ', days, ' дней');End.
Похожие вопросы
Предмет: Литература, автор: Аноним
Предмет: Алгебра, автор: vpgg9415