чему равна переменная s на выходе программы если на входе подали n=121 в ответе укажите число
var n,s,d:integer;
begin
readln(n);
s:=1; d:=2;
while n>=d do
begin
if (n mod d)=0 then s;=s+d;
d:=d+1;
end;
writeln(s);
end.
var n,s,d:integer;
begin
readln(n);
s:=1; d:=2;
while n>=d do
begin
if (n mod d)=0 then s;=s+d;
d:=d+1;
end;
writeln(s);
end.
More Questions From This User See All
Answers & Comments
121=11*11
s=1+11+121=133
ответ:133