программу написать?
да
нет найти s

Ответы и объяснения

2014-03-16T16:54:10+00:00
128
.................................
а как решить? решение надо
в первый круг цикла к 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)
2014-03-16T17:04:40+00:00
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
Она же не просила программу составлять. Нужно было просто ответ с решением. Зачем так заморачиваться?
мне не в пдалу)
я написал ее за 1мин)
Все равно лишние телодвижения))