Блок-схема,цикл Знайти суму перших десяти парних чисел
Program one;var i, n: integer; begini:=0;n:=10;while n <> 0 dobegininc(i, n);dec(n);end;write('Сумма первых 10 чисел = ', i); end.
я не пойму как сделать блок схему
я тебе ссылку кидал
то и будет блок схема
http://svgimnazia1.grodno.by/sinica/Information_technology/textbook/klass_8/urok_7/index1.htm
перейди на сайт
там листни чуть ниже, рис 113 это и будет блок схема
там есть рис 1,12 и 2,13
там нет 1,13
ау
ой 1. 11