Question

Какое наименьшее целое значение 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.

Answer 1

Ответ:

39

Объяснение:

............................................................................................