6. Определи, при каком наибольшем введённом значении переменной 
s программа выведет число 10. Для твоего удобства программа представлена на четырёх языках программирования.



Паскаль

var s, k: integer;

begin

readln (s);

k:=1;

while s < 60 do begin

k:= k + 3;

s:= s + k;

end;

writeln (k);

end.

Начинаем с первоначальных значений переменных s и k, равных 0 и 1 соответственно, и запускаем цикл while до тех пор, пока значение переменной s не станет больше или равно 60. На каждой итерации цикла увеличиваем значение переменной k на 3 и значение переменной s на k. Когда значение переменной s превысит 60, выводим предыдущее значение переменной s и завершаем выполнение программы.

Ответ 45