Int s = 0;
for(i=5; i<=30; i++){
s+=i;
}
print(s)
Пошагово распишем:
0. 52...12
1. 40...12
2. 28...12
3. 16...12
4. 4...12
5. 4...8
6. 4...4
В итоге исполнителю понадобится 6 шагов, чтобы уравнять количество фишек в кучке.
Ответ: 6.
Вы не указали конкретно, что нужно сделать. Ну, если нужно написать программу в Pascal, то она ниже. Либо напишите нормально что Вам нужно.
Begin
Writeln('На запад от Москвы природа подмосковного края.');
End.
Нашел 2 ошибки в 4- строке и 7- строке, объясняю на примере а=15, b=26
как я понял по данным задачи К больше или равно А то есть начальное значение S = A, вторую ошибку можно решить просто поменяв местами операторы 7-ой и 8-ой строки(чтобы сначала программа суммировала S=15+15 а потом уже 30+16,46+18...пока S<B а в задаче делается так 16+1,16+17, 30+18,...) в общем:
var a, b, s, k: integer;begin
read(a,b);
s := a;<-----
k := a;
while s < b do begins := s+k;<------k := k+1;<----end;writeln(k)end.
если
a=15 b=36
ответ будет :15