решить задачу по информатике. У меня получается ответ 350, но в ответах к заданию стоит - 3, т.е. они говорят, что 400 байт нужно. Мне кажется они не подумали, что 7 байт достаточно для хранения 55 бит.
var b: array[1..m, 1..n] of integer; i, j, k: integer;
begin Randomize; { Инициализация массива и вывод его первоначального состояния } { Одновременно - подсчет количества интересующих элементов } k:=0; Writeln('Исходный массив'); for i := 1 to m do begin for j := 1 to n do begin b[i, j] := Random(101) - 50; Write(b[i, j]:4); if (((i mod 2)<>0) and (b[i,j]>a)) then Inc(k) end; Writeln end; { Вывод результатов } Writeln('Элементов со значением больше ',a,' в нечетных строках: ', k) end.
Введём обозначения x - назад 2 у - вперёд 3 Всего команд 40 поэтому х+у = 40. Также сказано, что команд назад 2 на 10 больше: х-у = 10 Составим систему уравнений.
выразим из 2 уравнения х, получим: х = 10 + у подставим этот х в 1 уравнение: 10 + у + у = 40 упрощаем: 2у = 30 упрощаем: у = 15 подставим в выраженный ранее х: х = 10 + 15 = 25
Мы получили команд назад 2 - 25, то есть кузнечик в сумме сдвинулся назад на 2*25 = 50, а вперёд на 3*15 = 45. Если мы вычтем из 1 результата 2 то получим 5 - число указывает смещение кузнечика. То есть всю программу можно заменить одной командой: назад 5.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку