Запишите на ЯП Паскаль программу,
соответствующую данной блок-схеме:

Program H;var a,b,c,d; integer;beginreadln(a,b,c);if( a<c) then d:=a;if(b<c) then a:=b;d:=d+a;writeln(d);end.