Адача1. составьте блок схему и программу где введёное вещество число нужно записать в денежном формате например число 54.24 представить как 54тенге 24тиыны
Var a:real; begin write('введите число: ');read(a); writeln(int(a),' тенге ', round(100*frac(a)),' тиыны'); end.