S:=0;n:=5;for i:=2 to n do s:=s+100 div i; найти s после операции

Question

S:=0;n:=5;for i:=2 to n do s:=s+100 div i; найти s после операции

Comments

программу написать?

---

да

---

нет найти s

Answer 1

128
.................................

Comments

а как решить? решение надо

---

в первый круг цикла к s прибавиться 50, во второй 33, в третий 25, в четвертый 20. Вот и сложи))

---

Program prim;
uses crt;
var
s,i,n:integer;
begin
S:=0;n:=5;
for i:=2 to n do s:=s+100 div i;
S:=0;
n:=5;
for i:=2 to n do s:=s+100 div i;
writeln('s',s);
end. (128)

Answer 2

Program prim;
uses crt;
var s,i,n:integer;
beginS:=0;n:=5;
for i:=2 to n do s:=s+100 div i;
 S:=0;n:=5;
for i:=2 to n do s:=s+100 div i;
writeln('s',s);
end.
ОТВЕТ: 128

Comments

Она же не просила программу составлять. Нужно было просто ответ с решением. Зачем так заморачиваться?

---

мне не в пдалу)

---

я написал ее за 1мин)

---

Все равно лишние телодвижения))