Запишите на ЯП Паскаль программу, соответствующую данной блок-схеме:
Program H; var a,b,c,d; integer; begin readln(a,b,c); if( aif(bd:=d+a; writeln(d); end.