Составьте блок-схему и программу решения следующей . вычислите подоходный налог p% от заработной платы z p.

Var p,z:integer; d:real;
begin
writeln('Введите подоходный налог %'); read(p);
writeln('Введите зарабатную плату'); read(z);
d:=(z/100)*p;
writeln(d);
end.