напишите программу для решения следующей задачи: один литр жидкости для опрыскивания растений от вредителей стоит x копеек . определите стоимость 20,5? литров!?

var x,y1,y2:integer;beginwrite('x = ');readln(x);y1:=round(20.5*x) div 100;y2:=round(20.5*x) mod 100;writeln('Стоимость 20.5 л = ',y1,' руб ',y2,' коп');end.Пример:x = 28Стоимость 20.5 л = 5 руб 74 коп