Вопрос по информатике:
Помогите с задачей!
напишите программу определения стоимости разговора по телефону с учётом скидки 20% представляемой по субботам и воскресениям. Вычисление стоимости разговора по телефону. Введите исходные данные: Длительность разговора(целое количество минут)— 3 День недели(1-понедельник,...7-воскресенье)--5 Предоставляется скидка 20% Стоимость разговора: 5.52 руб. (она большая должна быть и для паскаля)!
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 05.06.2015 11:24
- Информатика
- remove_red_eye 2125
- thumb_up 45
Ответы и объяснения 1
Program D1KPxx3;
uses crt;
var
i:integer;
min,rez:real;
b:char;
label 1,2;
begin
1:write('Введите время разговора');
read(min);
writeln('Введите номер дня недели');
read(i);
if (i=6) or (i=7) then
begin
rez:=((min*5.52)-(min*0.2));
write('Стоимость разговора с учетом скидки равна: ',rez);
goto 2;
end
else
rez:=min*5.52;
write('Стоимость разговора равна: ',rez);
2:writeln('Ещё?? Y/N');
readln(b);
if b='Y' then
goto 1;
if b='N' then
write('Пока!');
end.
- 06.06.2015 03:45
- thumb_up 27
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.