Вот прикрепил файл вот прикрепил файл вот прикрепил файл
Int m,n;
For(int i=0:i<46:i++)
{ if(arr[i]>arr[i+1]) {m=arr[i];n=i;}}
12012(с основанием 3)= 140 (с основанием 10)
10302(с основанием 4)= 306 (с основанием 10)
140+306=446
446 (с основанием 10) = 1BE (с основанием 16)
Вот короткий пример цепочки, «превращающей» РОТУ в ПОЛК: РОТА – роЗа – Поза –поЛа –ПОЛК<span>.) Меняем только одну букву. Всё очень просто=)
</span>
Var
x: real;
begin
readln(x);
if x=0 then exit;
write(1/x);
end.
Не понимаю, зачем тут repeat