Запишите на алгориьмическом языке(Паскаль)алгоритм, соответствующий данной блок схеме:​

Паскаль:

program z1;

var a,b,c,d:integer;

begin

read(a,b,c);

if a < c then d:=a;

if b < c then a:=b;

d:=d+a;

write(d)

end.

Объяснение:

алг

нач

цел a, b, c, d

ввод a, b, c

если a < c то d := a все

если b < c то a := b все

d := d + a

вывод d

кон