Задача 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.