Var s, k: integer;

Begin

s : = 0;

for k : = 4 to 8 do

s : = s+6;

writeln (s) ;

End.

Объясните как решается, либо я не понимаю

Question

Информатика

Аникей

3 мая, 19:56

Var s, k: integer;

Begin

s : = 0;

for k : = 4 to 8 do

s : = s+6;

writeln (s) ;

End.

Объясните как решается, либо я не понимаю

+3

Ответы (1)

Знаете ответ на вопрос?

Коляша · Answer 1

Написал пояснение к каждой строке

Var s, k: integer;

Begin

s : = 0; / / Зануляем S

for k : = 4 to 8 do / / Цикл от 4 до 8

s : = s+6; / / Происходит подсчёт заданных чисел из цикла

writeln (s) ; / / Вывод ответа

End.

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

Var s, k: integer;

Begin

s : = 0;

for k : = 4 to 8 do

s : = s+6;

writeln (s) ;

End.

Объясните как решается, либо я не понимаю