Завтра диагностика! ! 16.автомат получает на вход четырёхзначное десятичное число. по полученному числу строится новое десятичное число по следующим правилам. 1. вычисляются два числа – сумма первой и второй цифр и сумма третьей и четвёртой цифр заданного числа. 2. полученные два числа записываются друг за другом в порядке неубывания (без разделителей). пример. исходное число: 2177. поразрядные суммы: 3, 14. результат: 314. определите, сколько из ниже чисел может получиться в результате работы автомата. 1915 20 101 1213 1312 312 1519 112 1212 в ответе запишите только количество чисел. 10.известная авиакомпания заносила данные о количестве утерянного багажа за год в таблицу lose. всего были занесены данные за последние 10 лет работы компании (lose[1] – количество утерянного багажа за первый год работы, lose[2] – за второй год и т. определите, какое число будет напечатано в результате работы следующей программы. текст программы на трёх языках программирования. алгоритмический язык ! алг нач целтаб lose[1: 10] цел t, m lose[1] : = 1; lose[2] : = 5 lose[3] : = 3; lose[4] : = 6 lose[5] : = 7; lose[6] : = 12 lose[7] : = 1; lose[8] : = 3 lose[9] : = 3; lose[10] : = 1 m : = 0 нц для t от 1 до 10 если lose[t] > 3 то m : = m + lose[t] все кц вывод m кон dim lose(10) as integer dim t,m as integer lose(1) = 1: lose(2) = 5 lose(3) = 3: lose(4) = 6 lose(5) = 7: lose(6) = 12 lose(7) = 1: lose(8) = 3 lose(9) = 3: lose(10) = 1 m = 0 for t = 1 to 10 if lose(t) > 3 then m = m + lose(t) end if next k print m паскаль! var t, m: integer; lose: array[1..10] of integer; begin lose[1] : = 1; lose[2] : = 5; lose[3] : = 3; lose[4] : = 6; lose[5] : = 7; lose[6] : = 12; lose[7] : = 1; lose[8] : = 3; lose[9] : = 3; lose[10] : = 1; m : = 0; for t : = 1 to 10 do if lose[t] > 3 then begin m : = m + lose[t]; end; writeln(m); end. 9.запишите значение переменной u, полученное в результате работы следующей программы. текст программы на трёх языках программирования. алгоритмический язык ! алг нач цел u,i u : = 30 нц для i от 1 до 6 u : = u – i кц вывод u кон ! dim i,u as integer u = 30 for i = 1 to 6 u = u – i next i print u var u,i: integer; begin u : = 30; for i : = 1 to 6 do u : = u – i; writeln(u); end. 7.дима хотел послушать музыку на компьютере, для этого ему нужно было включить музыкальный файл белые_розы.mp3. он начал работу с каталога с: \музыка\хиты. сначала он спустился на один уровень вниз, в каталог ретро, затем поднялся на один уровень вверх, потом спустился на один уровень в каталог лучшие и нашёл там нужный музыкальный файл. запишите полный путь к данному файлу. 1) с: \музыка\хиты\лучшие\белые_розы.mp3 2) с: \музыка\белые_розы.mp3 3) с: \белые_розы.mp3 4) с: \музыка\хиты\ретро\белые_розы.mp3
1915 – не могло: в порядке неубывания число делится на 1 и 915, 915 – не сумма двух цифр
20 – не могло: не делится на два числа в порядке неубывания, только 2 и 0
101 – не могло: не делится на два числа в порядке неубывания, только 10 и 1
1213 – могло, например, для числа 6667
1312 – не могло: в порядке неубывания число делится на 1 и 312, 312 – не сумма двух цифр
312 – могло, например, для числа 1266
1519 – не могло: в порядке неубывания число делится на 1 и 519 или 15 и 19, 519 и 19 – не сумма двух цифр
112 – могло, например, для числа 1066
1212 – могло, например, для числа 6666
10. Дан массив [1, 5, 3, 6, 7, 12, 1, 3, 3, 1].
Изначально m = 0, при обходе массива если элемент Lose[t] больше 3, то к m прибавляется Lose[t].
Значит, после выполнения программы на экране будет напечатана сумма элементов массива, больших трёх. Эта сумма равна 5 + 6 + 7 + 12 = 30.
9. Изначально u = 30. Затем для каждого i от 1 до 6 из u вычитается значение i, после цикла u равно 30 - 1 - 2 - 3 - 4 - 5 - 6 = 9. Это значение будет выведено на экран.
7. Путь Димы: С:\Музыка\Хиты – С:\Музыка\Хиты\Ретро – С:\Музыка\Хиты – С:\Музыка\Хиты\Лучшие
В последней папке он запустил Белые_розы.mp3. Полное имя файла состоит из пути к папке и имени файла:
С:\Музыка\Хиты\Лучшие\Белые_розы.mp3