1. написать программу вычисления стоимости некоторого количества яблок( на языке pascal) 2. написать программу, которая преобразует введённое с клавиатуры дробное число в денежный формат ( pascal )

Program z26;  Var a:integer; b, c:real;Begin  write('Введите стоимость 1-го яблока - '); readln(a);  write('Введите кол-во яблоу - '); readln(b);  c:=a * b;  writeln('Сумма покупки - ',c);  End.