Составит блок-схему, 1. найти сумму первых 10 натуральных чисел. program z11 var n,s: integer; begin s: =0 for n: =1 to 10 s: =s+n; writeln ('сумма первых 10 натуральных чисел равна', s) end 2. двух значение по возростанию program z12 var x,y: integer; v: integer begin write(введите x, y: ') readln(x,y); if x> y then begin
