1 / 1 / 0
Регистрация: 18.11.2010
Сообщений: 25
1

В киоске продается газета стоимостью 3 коп. и журнал стоимостью 20 коп.

24.11.2010, 10:54. Показов 8890. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
В киоске продается газета стоимостью 3 коп. и журнал стоимостью 20 коп. Составить программу, которая спрашивает о желании покупателя (журнал или газета?), принимает деньги (сумма денег вводится с клавиатуры) и печатает причитающуюся сдачу. Исходные данные задать самостоятельно. Количество покупателей равно N. Указания к решению задачи :
Покупателю нужно задать по меньшей мере два вопроса: 1. «Что хотите купить: журнал или газету?» После ввода ответа нужно показать соответствующую стоимость издания и задать следующий вопрос. 2. «Сколько платите?» Количество денег покупателя вводится с клавиатуры (в числовую переменную). Далее надо сравнить это количество со стоимостью покупки и напечатать итоговое сообщение.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.11.2010, 10:54
Ответы с готовыми решениями:

В кассовом аппарате есть восемь 25-копеечных монет, 10 - стоимостью по 50 коп. и 12 - по 5 коп
В кассовом аппарате есть восемь 25-копеечных монет, 10 - стоимостью по 50 коп. и 12 - по 5 коп....

Можно ли за A рублей купить B книг, стоимостью C и D журналов, стоимостью E?
1. Некто располагает суммой в А руб. Он хочет купить В книг по С руб. и D журналов по Е руб....

Товар стоит "a" руб. "b" коп. За него заплатили "c" руб. "d" коп. Сколько сдачи требуется получить?
Товар стоит a руб. b коп. За него заплатили c руб. d коп. Сколько сдачи требуется получить?...

Установка нескольких ОС на один коп
Здравствуйте. Хочу установить на компьютер несколько ОС Виндовс, Линукс и Мак ОС Лайон для учебы и...

1
4117 / 999 / 191
Регистрация: 09.04.2009
Сообщений: 4,223
24.11.2010, 11:41 2
Лучший ответ Сообщение было отмечено Kalamase23 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
uses crt;
var
n,i,st,zd,ba:integer;
begin
writeln('n?');
readln(n);
for i:=1 to n do begin
clrscr;
writeln('4to kyplaem?');
writeln('1 - gazeta = 3 kop');
writeln('2 - zyrnal = 20 kop');
readln(st);
 
if st=1 then st:=3
else if st=2 then st:=20
else begin
st:=0;
writeln('korjavij variant');
end;
 
if st>0 then begin
writeln('skoka platim?');
readln(ba);
if ba>st then writeln('zda4i - ',ba-st)
else writeln('nedostato4no sredstv, poshel von nis4ij');
end;
 
readln;
end;
readln;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.11.2010, 11:41
Помогаю со студенческими работами здесь

Считывание информации с GPIB шины (КОП)
Ребят подскажите идеи реализации надо решить вопрос считывания информации с GPIB который идет от...

Вывод цен в виде руб/коп
НЕ ПОЛУЧАЕТСЯ ГРАМОТНЫЙ КОД НАПИСАТЬ,ХОТЬ УБЕЙТЕ!( Дан текстовый файл, представляющий собой...

Управление устройством через КОП (GPIB)
В лаборатории измерительной техники у нас много различных устройств: частотомеры, мультиметры,...

Сумма в отчете в формате Х руб. ХХ коп.
Подскажите пожайлуста Можно ли сделать:вПоле сумма пишет сумму100,20 а, надо 100 руб.20 коп. как...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru