Определить наименьшую из разностей |Аi| - |Аn-i+1| (n - чет ное). Cоставить блок схему.

страус- самая крупная в мире птица. не летает

подвести курсор справа от удаляемого символа

клацнуть бэкспейс

радоваться

program sdss;

uses crt;

var a,b,i: integer;

      c: real;  

begin

clrscr;

readln(a,b);

for i: =a to b do

  c: c+i;

c: =c/(b-a+1);

writeln(c: 2: 4);

readkey;

end. 

за синтаксис не бить

дано а1,а2,б1,б2 - целые

начало

  ввод а1,а2,б1,б2

  a1=a1*б2+б1*а2

  а2=а2*б2

  вывод а1,а2

конец