Решить на pascal. зарание )) хозяин хочет обклеить обоями длинную стену в своем доме. длина этой стены =а м., а высота- b м. рулон обоев имеет длину 12 м и ширину с м. сколько будут стоить обои для всей стеныё если цена одного рулона k гривень?

Юлия3640 Юлия3640    2   14.06.2019 12:20    1

Ответы
a01065699799 a01065699799  12.07.2020 06:18
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика