Var k, s: integer; begin s: =1; k: =0; while k < 13 do begin s: =s+2*k; k: =k+4; end; write(s+k); end. нужно составить уравнение/неравенство для решения для лучшего понимая как можно подробнее

так, ну смотри.

у тебя изначально даны две переменные

s, которое равно 1

k, которое равно 0

программа заходит в цикл, в котором пока k будет меньше 13

будут выполняться данные вычисления

получается, что каждый раз, числу s и k будут присваиваться новые значения

щас распишу

цикл прервался! т.к. 16 меньше 13

теперь мы выводим сумму s и k

49+16=65