Предмет: Информатика,
автор: вавам325423
В первый день строительства Колизея работал один рабочий и уложил 100 камней. Каждый последующий день рабочих становилось больше на один и каждый приносил на 1 камень больше, чем предыдущий. Через сколько дней был построен Колизей, если для его постройки нужно х камней Сделать в паскале с репитом!!!!!
Disaczar:
то есть во второй день был уложен 101 камень, а в третий - 102?
нет,1-ый день 100камней, а 2-ой 201камень
100, 201,302,403, так?
да
у меня есть один вариант, но что-то не так 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.
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.
Ответы
Автор ответа:
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.
Похожие вопросы
Предмет: Қазақ тiлi,
автор: zanelerbol86
Предмет: Алгебра,
автор: winqom
Предмет: Информатика,
автор: vainervisting21777
Предмет: Математика,
автор: Арабат
Предмет: Алгебра,
автор: МаргаритаКорж