50

Спставьте программу на языке Pascal: Для ремонта кабинета шириной…

dates 26 марта 2023

Спставьте программу на языке Pascal: Для ремонта кабинета шириной а метров, длиной b метров, высотой h метров необходимо купить в магазинеобоев. Площадь окон и дверей не учитывать. Известна стоимость одного рулона (86 рублей) обоев длиной 12 м и шириной 0,6 м. Составьте программу определяющую, какая сумма необходима для покупки обоев.

категория: информатика

96

Program olraisinsss; const n=86; z=12; c=0,6; var a,b,h,p1,sum: integer; p2: real; beginwrite ('a='); read (a); write ('b='); read (b); write ('h='); read (h); p1: =4*(b+h)+4*(a+h); while p2 комментировать


Знаете другой ответ?
Другие вопросы по информатике

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...