var a,s,i:integer;
begin
randomize;
s:=0;
for i:=1 to 15 do
begin
a:=random(100);
s:=s+a;
end;
write('s=',s);
end.
В ходе преобразование получилось: 47277
.
.
.
.
.
P.s. табличка пригодится для дальнейших преобразований.
Интернет!!!!!!!!!!!!!!!!!!!!!!!!!
1. Это число двузначное?
2. Это число делится на два?
3. Это число делиться на пять?
4. Это число простое?
Ну это всё что я смог придумать
:(