М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
refwqef
refwqef
26.05.2022 22:57 •  Информатика

Написать программу на Паскале для решения задачи. В двух комнатах шириной - А, длиной - B и высотой - H есть по два окна размером X на Y и по одной двери с размерами C на D. При первой покраске расходуется 250 грамм краски, при второй – 150 грамм. Сколько будет израсходовано краски для двух комнат. ​

👇
Ответ:
loli40
loli40
26.05.2022

жди скоро напишу

4,8(45 оценок)
Открыть все ответы
Ответ:
Dedret
Dedret
26.05.2022

#include <iostream>

using namespace std;

class circle {

public:

   int x, y;

   double r, s;

   circle()

   {        

       x = 0;

       y = 0;

       r = 0;  

   }

   circle( int a = 0, int b = 0, double c = 0 )

   {

       set(a, b, c);        

   }

   void out()

   {

       cout << "Координаты: (" << x << ", " << y << ") Радиус: "<< r << " Площадь: " << endl;        

   }

   void set(int a, int b, double c)

   {

       x = a;

       y = b;

       r = c;

   }    

   void calculate() {

       s = r * r * 3.14159;        

   }

};

 

class sphere : public circle {

private:

   double  v;

   void calculate() {      

       s = 4 * 3.14 * r * r;  

       v = 3.14159 * pow(r, 3);

   }    

public:

   sphere();

   sphere() : circle(circle, double = 1.0);

   sphere (int = 0, int  = 0, double = 1.0) ;

 

 

 

void out()

   {

       circle::out();

       cout << ", радиус: " << r << ", длина: " << ", площадь: " << s;        

   }

};

int main(){

   setlocale(LC_ALL, "ru");

   circle a(2, 15, 4);

   a.out();

   sphere b;

 

   

   system("pause");

   return 0;

}

Объяснение: пойдёт?

4,4(57 оценок)
Ответ:
Sadovnik11
Sadovnik11
26.05.2022

Pascal:

1.

var a,b:Integer;

   x:Double;

begin

 writeln('Введите a, b: ');

 readln(a,b);

 x:=a+b;

 writeln(a,'+',b,'=',x);

 x:=a*b;

 writeln(a,'*',b,'=',x);

end.

2.

var a,b:Integer;

begin

 writeln('Введите оценки за две КР: ');

 readln(a,b);

if (a+b)>= 8 then writeln('Молодец!')

else writeln('Подтянись!')

end.

Python:

1.

a, b = int(input('Введите a')), int(input('Введите b'))

x = a+b

print(str(a) + '+' + str(b) + '=' + str(x))

x = a*b

print(str(a) + '*' + str(b) + '=' + str(x))

2.

a, b = int(input('Введите первую оценку')), int(input('Введите вторую оценку'))

if a+b >= 8:

print('молодец!')

else:

print('подтянись!')

4,7(8 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ