Постройте блок-схему

даны два действия положительных числа a и b. необходимо найти среднее арифметическое и среднее этих чисел.
заранее

схемы ниже, это проги.

program хэзэков;

var a,b,sr: real;

begin

readln(a,b);

sr: =(a+b)/2;

write(sr);

end.

program ебобо;

var a,b,sr: integer;

begin

readln(a,b);

sr: =sqrt(a*b);

writeln(sr);

end

арефмет

начало

sr: =(a+b)/2

вывод sr

конец

начало

sr: =sqrt(a*b)

вывод sr

конец