Задача по информатике блок схема плюс код на паскале.

Штану стоят А руб. Футболка B руб. Носки С руб. Маша пошла в магазин за штанами, футболкой и носками. Если сумма покупки превышает X, то Маша не сможет купить комплект. Сделайте лёгкий код и блок схему на паскале. Если будет все правильно,

var a,b,c,x:integer;

Begin

   Write('Введите стоймость штанов: ');

   Read(a);

   Write('Введите стоймость футболки: ');

   Read(b);

   Write('Введите стоймость носков: ');

   Read(c);

   Write('Введите количество денег в кошельке: ');

   Read(x);

   If (a+b+c)>x then

       WriteLn('Маша не может купить комлпект')

   Else

       WriteLn('Маша хватит на комлпект')

End.