Начали писать программы в паскаль, и надо как то оформить : поклейка прямоугольной стены. длина стены - a. высота - b. рулоны 12 (длина) на 1(ширина) цена 1 рул. - k рул. нужно узнать на всю стену - ?

anognev anognev    3   19.03.2019 21:30    0

Ответы
funtic20 funtic20  26.05.2020 05:24

var a,b,k,i:integer;
begin
readln(a,b,k);
if a/12>b then i:=(a div 12)+1 else i:=b;
writeln('Cena - ',k*i);
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика