В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
элюсся5
элюсся5
17.01.2022 12:10 •  Информатика

(C++)Даны два прямоугольника стороны которых параленьни или перпендикулярны осям координат. Известны координаты левого нижнего угла каждого из них и длины их сторон. Найти координаты левого нижнего и правого верхнего углов минимального прямоугольника, содержащего указанные прямоугольники.

Показать ответ
Ответ:
nastyapuhova1
nastyapuhova1
08.10.2020 02:29

#inclued<bits/stdc++.h>

using namespace std;

int main()

{int d,m;

cin>>d>>m;

if (m==1)

{if (d>=20)

cout<<"vodoleey";

else cout<<"kozerog";}

if (m==2)

{if (d>=19)

cout<<"ribi";

else cout<<"vodoley";}

if (m==3)

{if (d>=21) cout<<"oven";

else cout<<"ribi";}

if (m==4)

{if (d>=20)

cout<<"telec";

else cout<<"oven";}

if (m==5)

{if (d>=21)

cout<<"blizneci";

else cout<<"telec";}

if (m==6)

{if (d>=22)

cout<<"rac";

else cout<<"blizneci";}

if (m==7)

{if (d>=23)

cout<<"lev";

else cout<<"rac";}

if (m==8)

{if (d>=23)

cout<<"deva";

else cout<<"lev";}

if (m==9)

{if (d>=23) cout<<"vesi";

else cout<<"deva";}

if (m==10)

{if (d>=23)

cout<<"scorpion";

else cout<<"vesi";}

if (m==11)

{if (d>=23)

cout<<"strelec";

else cout<<"scorpion";}

if (m==12)

{if(d>=22)

cout<<"kozerog";

else cout<<"strelec";}

return 0;

}

0,0(0 оценок)
Ответ:
dylanboy
dylanboy
11.09.2020 06:32

Program Zn;

uses CRT;

type mas=array [1..20, 1..20] of real;

var A:mas; i,j,g,b,n,m,o:integer;   l:real;

Begin

     clrscr;

     write ('Введите диапазон массива: ');

     readln (g,b);

     write ('Введите размер массива: ');

     readln (n,m);

     Randomize;

     For i:=1 to n do

         Begin

          For j:=1 to m do

             Begin

                  A[i,j]:=random(b-g)+g;

                  write (A[i,j]:5:0, '  ');

             End;

             writeln;

         End;

     O:=0;

     For i:=1 to n do

       Begin

         For j:=1 to m do

             Begin

                  A[3,j]:=O;

             End;

       End;

     For i:=1 to n do

         Begin

           For j:=1 to m do

              If i=1 then

               Begin

                    L:=l+A[i,j];

               End;

         End;

     writeln ('Новый массив');

     For i:=1 to n do

        Begin

         For j:=1 to m do

             Begin

                  write (A[i,j]:5:0, '  ');

             End;

             writeln

        End;

        writeln ('Сумма элементов первой строки= ',l:5:0);

readln;

End.

 Вообщем вот.

 

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота