Составьте программу, реализующую эпизод применения компьютера в книжном магазине. Компьютер запрашивает стоимость книг и сумму денег, внесенную покупате
10-11 класс
|
лем. Если сдачи не требуется, печатает на экране «Спасибо». Если денег внесено больше, то печатает «Возьмите сдачу» и указывает сумму сдачи. Если денег недостаточно, то печатает об этом сообщение и указывает размер недостающей суммы.
на паскале
var st,sum:integer;
begin
writeln('Vvedite stoimostj knig');
readln(st);
writeln('Vvedite vnesennuju summu');
readln(sum);
if st=sum then writeln('Spasibo')
else if sum>st then writeln('Vozjmite sdachu: ',sum-st,' rublei')
else writeln('Doplatite: ',st-sum,' rublei')
end.
Другие вопросы из категории
На PascalABC нужно сделать задачу:
"Верно ли, что x лежит вне отрезков (m,n) и [l,k]."
входивших по порядку
(за-данным в программе), c. выводится на экран сообщение (совпал или не совпал номер).
Читайте также
2. Составить программу для упорядоченное двух элементов по убыванию.
вывести список книг, изданных после 2003 года.
2)составить программу , организующую массив записей о пяти студентах и их оценках по трем предметам. провести сортировку и вывести список отличников.
ракета запускается с земли со скоростью V(км час) в направлении движения земли по орбите вокруг солнца. составить программу,определяющую результат запуска ракета в зависимости от скорости V.
Известно,что при V16,4 ракета покинет солнечную систему.
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"
Составить программу к.т. запрашивает буквы, пока не введут точку и находит количество букв "0".