Ребяяят,нужна помощь,очень срочно
Сомневаюсь в правильности своих решений
Помогите!!!:)
Приложения:
![](https://st.uroker.com/files/c63/c6338357b3071cb57e0a72ad5457747d.jpg)
Ответы
Ответ дал:
0
0,875=7/8
пример в паскале:
var
i,x,k:integer;
begin
for x:=1 to 10000 do
begin
k:=0;
for i:=10 downto 2 do
begin
if (x mod i=i-1) then k:=k+1;
end;
if k=9 then writeln('Полученное число:',x);
end;
end.
пример в паскале:
var
i,x,k:integer;
begin
for x:=1 to 10000 do
begin
k:=0;
for i:=10 downto 2 do
begin
if (x mod i=i-1) then k:=k+1;
end;
if k=9 then writeln('Полученное число:',x);
end;
end.
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад
9 лет назад