Определить значение переменной S после выполнения операторов
s:=0;
for i:=1 to 5 do
begin s:=s+i; s:=1; end;

Конечно же, 1.
Что бы ни делалось и сколько бы раз ни делалось, при каждом проходе по циклу последним выполняется оператор s:=1.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.