В продаже книг в книжном магазине принимает участие ЭВМ

@Maserati · Регистрация: 24.06.2012

Author24 — интернет-сервис помощи студентам

Составить программу, которая запрашивает стоимость книг, сумму денег, внесенную покупателем, а далее определяет причитающуюся сдачу (если денег внесено больше) напечатает "Спасибо", если сдачи не требуется, или выдает сообщение о недостаточности внесенной суммы. Исходные данные задать самостоятельно. Программа должна обслуживать поток покупателей в течение дня, определяя в конце рабочего дня общую сумму, полученную от продажи книг.

@fretyno · 24.06.2012, 13:18

Сколько покупателей? Или это тоже самостоятельно задавать?

Добавлено через 25 минут

Pascal

Program magaz;
var
sdacha,den,cena,sum,n,n1 : integer;
begin
write('Введите кол-во клиентов: ',n1);
readln(n1);
while n<n1 do
begin
write('Введите стоимость книги: ');
readln(cena);
write('Получено денег: ');
readln(den);
if cena=den then writeln('Спасибо за покупку!')
else 
  begin
    if cena>den then 
    begin
    sdacha:=cena-den;
    writeln('Еще ',sdacha,' рублей(я) пожалуйста');
    end
    else 
    begin
    sdacha:=den-cena;
    writeln('Ваша сдача - ',sdacha,' рублей(я). Cпасибо за покупку!');
    end;
  end;
  sum:=sum+cena;
n:=n+1;
end;
 
writeln('Итог за день: ',sum);
writeln('Обслужено клиентов: ',n);
end.

@Maserati · 24.06.2012, 14:21 **[ТС]**

Тоже самостоятельно.

@fretyno · 24.06.2012, 16:32

Сообщение от Maserati

Тоже самостоятельно.

Сделал

@Maserati · 24.06.2012, 22:22 **[ТС]**

Спасибо огромное))) выручил))

@fretyno · 25.06.2012, 06:23

Сообщение от Maserati

Спасибо огромное))) выручил))

Незачто)

@Maserati 1 / 1 / 0 Регистрация: 24.06.2012 Сообщений: 12
		1
	В продаже книг в книжном магазине принимает участие ЭВМ 24.06.2012, 12:32. Показов 4829. Ответов 5 Метки нет (Все метки) Составить программу, которая запрашивает стоимость книг, сумму денег, внесенную покупателем, а далее определяет причитающуюся сдачу (если денег внесено больше) напечатает "Спасибо", если сдачи не требуется, или выдает сообщение о недостаточности внесенной суммы. Исходные данные задать самостоятельно. Программа должна обслуживать поток покупателей в течение дня, определяя в конце рабочего дня общую сумму, полученную от продажи книг. 0

@Maserati 1 / 1 / 0 Регистрация: 24.06.2012 Сообщений: 12
	24.06.2012, 14:21 [ТС]	3
	Тоже самостоятельно. 0

@fretyno 1 / 1 / 1 Регистрация: 26.05.2012 Сообщений: 159
	24.06.2012, 16:32	4
	Сообщение от Maserati Тоже самостоятельно. Сделал 0

@Maserati 1 / 1 / 0 Регистрация: 24.06.2012 Сообщений: 12
	24.06.2012, 22:22 [ТС]	5
	Спасибо огромное))) выручил)) 0

@fretyno 1 / 1 / 1 Регистрация: 26.05.2012 Сообщений: 159
	25.06.2012, 06:23	6
	Сообщение от Maserati Спасибо огромное))) выручил)) Незачто) 0