Задача 1. Написать программу вычисления стоимости некоторого количества яблок( на языке Pascal) Задача 2. Написать программу, которая преобразует введённое с клавиатуры дробное число в денежный формат ( Pascal )
Answers & Comments
FANTSCR1N
Program z26; Var a:integer; b, c:real;Begin write('Введите стоимость 1-го яблока - '); readln(a); write('Введите кол-во яблоу - '); readln(b); c:=a * b; writeln('Сумма покупки - ',c); End.
Answers & Comments