Во Какое расширение имеет скомпилированный файл для компьютера и какое расширение имеет исполняемое приложение для смартфона?
2. Если вы устанавливаете мобильное приложение с кабеля, какие предварительные шаги необходимо выполнить?
3. Какие еще скачивания исполняемого файла с компьютера на мобильное устройство вы можете предложить?
// Внимание! Если программа не работает, обновите версию!
begin
var g:=ArrRandom(31,0,40); g.Println;
Writeln(g.IndexMax+1)
end.
Пример
38 34 15 11 2 33 12 39 12 0 32 23 7 18 22 31 0 6 19 15 24 37 26 12 7 9 20 25 21 18 20
8
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
begin
var y:=ReadArrReal('2008:',12);
var z:=ReadArrReal('2009:',12);
var d:=y.Average-z.Average;
if d>0 then Writeln('2008 теплее')
else
if d<0 then Writeln('2009 теплее')
else Writeln('Оба года имеют одинаковую среднюю температуру')
end.
Пример
2008: -12.7 -10.4 -2.3 5.7 12.5 19.6 24.1 22.8 19.9 17.6 8.2 -7.4
2009: -15.2 -9.4 1.6 7.1 13.5 17.1 26.3 21.4 17.5 14.2 10.1 -12.6
2008 теплее
Итак. Мы имеем строку из 72 пятерок.
Сначала все пятерки заменяются на тройки (приоритетным действием у нас является замена первого вхождение трех идущих подряд пятерок тройками, а т.к. 72 кратно трем, то преобразованная строка будет состоять только из троек). После этого у нас остается строка, состоящая из 24 троек.
555 555 555 555 ... 555 => 333 333 333 333 333 333 333 333
Затем происходят такие действия: три последовательно идущие тройки заменяются на пятерки, а после того как таких пятерок будет три, они заменятся на одну тройку. Следственно 9 троек заменяются на одну. После проведение данных действий у нас остается 24-9+1-9+1=16-9+1=8 троек.
333 333 333 333 333 333 333 333
555 333 333 333 333 333
333 333 333 333 333 3
555 333 333 3
333 333 33
Так как мы уже не можем получить заменой троек хотя бы три пятерки, то первые вхождения трех подряд идущих троек заменяются пятерками.
333 333 33
5 333 33
5533
ответ: 5533