Question

Var s,k: integer; Begin s := 0; for k := 4 to 8 do s := s+6; writeln(s); End. Объясните как решается, либо я не понимаю

Answer 1

Написал пояснение к каждой строке
Var s,k: integer;
Begin
s := 0; // Зануляем S
for k := 4 to 8 do // Цикл от 4 до 8
s := s+6; // Происходит подсчёт заданных чисел из цикла
writeln(s); // Вывод ответа
End.