Нужна блок схема к следующим алгоритмам на паскаль школьная работа 4. var i: longint; begin for i: =100 to 999 do if (i mod 7)=0 then writeln(i); end.5.var i,s: longint; begin s: =0; for i: =100 to 999 do if (i mod 13)=0 then s: =s+i; writeln(s); end.6. var i,k: longint; begin k: =2; for i: =1 to 10 do begin writeln('2 в степени ',i,'=',k); k: =k*2; end; end.