Составте программу в pascal, которая выводит на экран кол-во рублей…

Program Money; Uses Crt; var K,N,Rub: integer (можно и real); Begin; writeln ('Каков курс доллара к рублю? (Сколько рублей в одном долларе?) '); readln (K); writeln ('Кол-во долларов: '); readln (N); Rub: =N*K; ClrScr; writeln (N,'$=',Rub,'Rub'); readln; Delay (10000); end.