Какое наименьшее целое значение k необходимо подать на вход программы, чтобы в результате её выполнения напечаталось число 12?
Какой программы?
ща
Var k, s : integer; Begin read(k); s := 10; while s < k do begin s := s + 1; k := k – s End; write(s) end.
у вас 1 вариант ?
да
Ответ 23
10 + 1
23 - 11 = 12
11 + 1 = 12
12 = 12
значит цикл прекращается и выводит 12
а поможешь еще
пж
я 150 баллов отдам