Вопрос по информатике:
ПОМОГИТЕ решить на Pascal. Зарание спасибо))
Хозяин хочет обклеить обоями длинную стену в своем доме. Длина этой стены =а м., а высота- b м. Рулон обоев имеет длину 12 м и ширину с м. Сколько будут стоить обои для всей стеныё если цена одного рулона k гривень?
- 25.01.2018 09:37
- Информатика
- remove_red_eye 15818
- thumb_up 12
Ответы и объяснения 1
PascalABC.net (Ceil - округляет до целого в большую сторону)
var
a,b,c,k,s:real;
n:integer;
begin
write('Введите a,b,c,k: ');
readln(a,b,c,k);
n:=Ceil((a*b)/(12*c));
s:=n*k;
writeln(s,' гривен');
end.
- 26.01.2018 17:21
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.