Question

Помогите пожалуйста, информатика

Answer 1

Var sum,i:integer;beginfor i:=20 to 100 do if i mod 6 = 0 then begin writeln(i);sum:= sum + i;end;writeln('sum =', sum);end.