Var s,k: integer; Begin s := 0; for k := 4 to 8 do s := s+6; writeln(s); End. Объясните...

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. 

Comments

А решение можно?

---

Что решает? Сформулируйте нормально свой вопрос.

---

Запишите значение переменной s, полученное в результате работы
следующей программы. Текст программы приведён на трёх языках
программирования.

---

Это задача по огэ

---

Вы не можете скопировать код, вставить его в паскаль и посмотреть ответ?

---

Я не понимаю этого

---

Ответ = 30

---

А как получилось 30 если 6+6+6+6=24

---

Есть цикл for k := 4 to 8 do который подсчитывает сумму 4+5+6+7+8=30

---

Значит число s+6 оно не к чему?