ПОМОГИТЕ СОСТАВИТЬ КОД ДЛЯ БЛОК-СХЕМЫ!!! ДАЮ 50 БАЛЛОВ

PascalABC.NET

var a, b, s : real;

begin

   a := 5;

   b := 3.5;

   s := a+b;

   writeln(s);

end.