Question

Определите, что будет выведено в результате работы программы. Запишите условие задачи, для решения которой составлен алгоритм. var m: integer;begin m:=151; while (m mod 15<>0) do m:=m+1; writeln (‘M= ’, m); end.​

Answer 1

Ответ:

M= 165

Объяснение:

151 mod 15 = 1

151 + 1 = 152

152 mod 15 = 2

152 + 1 = 153

153 mod 15 = 3

153 + 1 = 154

154 mod 15 = 4

154 + 1 = 155

155 mod 15 =  5

155 + 1 = 156

156 mod 15 = 6

156 + 1 = 157

157 mod 15 = 7

157 + 1 = 158

158 mod 15 = 8

158 + 1 = 159

159 mod 15 = 9

159 + 1 = 160

160 mod 15 = 10

160 + 1 = 161

161 mod 15 = 11

161 + 1 = 162

162 mod 15 = 12

162 + 1 = 163

163 mod 15 = 13

163 + 1 = 164

164 mod 15 = 14

164 + 1 = 165

165 mod 15 = 0

Answer 2

Данный код представляет собой программу на языке программирования Pascal. Давайте разберем, что он делает:

1. Инициализируется переменная m значением 151.
2. Запускается цикл while, который будет выполняться, пока условие (m mod 15 <> 0) истинно. m mod 15 означает остаток от деления m на 15. Если остаток не равен 0, то условие истинно.
3. Внутри цикла переменная m увеличивается на 1.
4. Цикл будет выполняться до тех пор, пока m не станет таким значением, что m mod 15 будет равно 0, то есть пока m не станет кратным 15.
5. Когда условие цикла станет ложным (когда m станет кратным 15), программа выйдет из цикла.
6. После выхода из цикла будет выведено сообщение о значении m.

Таким образом, программа будет выполнять цикл до тех пор, пока значение m не станет кратным 15, то есть пока m mod 15 <> 0. Как только это условие перестанет выполняться, программа выведет значение m.

Поскольку начальное значение m равно 151, то цикл выполнится 14 раз (добавим 1 к 151, пока не достигнем 165, которое кратно 15). После этого программа выведет "M= 165".