Составить блок-схему, которая в последовательности натуральных чисел определяет сумму чисел, кратных 6.
sum:=0;
for i:=0 to 100 do
if a mod 6=0 then sum:=sum+a;