Начертите блок схему к этой . заранее огромное вам за ответ!
var b,i,sym : integer;
begin
read(b);
for i: =10 to b do if (i mod 2 < > 0) and (i mod 3 = 0) then inc(sym,i);
writeln(sym);
end.
нужна блок схема на , эту схему я нашёл на другом сайте, не знаю правильная ли
мне прост блок схему, заранее большое!