создать блок схему на языке паскаль пересчёта из дюймов в сантиметры (1см=2.54 дюйм)

vara:integer;p:real;constd=2.54;beginwrite('Введите число для перевода (см→дюйм) : ');readln(a);p:=a*d;writeln(p);readln;end.