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

Ответы

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

denistixan: А решение можно?
ProgrammerV1: Что решает? Сформулируйте нормально свой вопрос.
denistixan: Запишите значение переменной s, полученное в результате работы
следующей программы. Текст программы приведён на трёх языках
программирования.
denistixan: Это задача по огэ
ProgrammerV1: Вы не можете скопировать код, вставить его в паскаль и посмотреть ответ?
denistixan: Я не понимаю этого
ProgrammerV1: Ответ = 30
denistixan: А как получилось 30 если 6+6+6+6=24
ProgrammerV1: Есть цикл for k := 4 to 8 do который подсчитывает сумму 4+5+6+7+8=30
denistixan: Значит число s+6 оно не к чему?
Вас заинтересует