Составьте программу в паскале со всеми строчками! Хозяин хочет оклеить обоями длинную стену в своем доме. Длина этой стены равна А метров, а высота - В метров. Рулон обоев имеет длину 12 метров и ширину K см. Составьте алгоритм и программу, которая определит стоимость обоев для всей стены, если цена одного рулона C руб.

Question

Информатика

Леонард

14 мая, 23:12

Составьте программу в паскале со всеми строчками! Хозяин хочет оклеить обоями длинную стену в своем доме. Длина этой стены равна А метров, а высота - В метров. Рулон обоев имеет длину 12 метров и ширину K см. Составьте алгоритм и программу, которая определит стоимость обоев для всей стены, если цена одного рулона C руб.

+4

Ответы (1)

Знаешь ответ?

Силуян · Answer 1

Var a, b, k, c: real; n: integer;

begin

readln (a, b, k, c);

n:=round ((a*b) / (12*k/100) + 0.5);

writeln (n*c:5:2);

end.

Пример:

5 4 80 120

360.00