Write a program that calculates the sum of natural numbers divisible by 3.

Program Chisla;
Var A, B: integer;
Begin
i: = 1
From i 1 to 10 do
Writeln (“Enter a number”);
Readln (A);
If (A mod 3) – 0 then B: = A + b;
Writeln (“Amount -“), B;
end



One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.