Var x:integer;
begin
readln(x);
for var i:=2 to x do
if (x mod i)=0 then begin
writeln('delitel: ',i);
exit;
end;
<span>end.</span>
Ответ:
1. 20
2. 30
Объяснение:
Это рекурсивный алгоритм, новые значения берутся из значений полученных ранее
F(1)=2
F(2)=F(2-1) + 2*2=2+4=6
F(3)=F(3-1) + 2*3=6+6=12
F(4)=F(4-1) + 2*4=12+8=20
Аналогично со 2 алгоритмом
На рабочем столе есть значок с надписью " корзина" . Туда и удаляется вся ненужная информация с компьютера. Но информацию из корзины можно восстановить и просмотреть, нажав на ярлык левой кнопкой мыши и нажав на удаленную информацию правой кнопкой мыши.
Из комплекса программ, определяющих на компьютере системную среду и правила работы в ней