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

Написать программу в

сформировать в одном цикле два одномерных массива z1, z2 длиной n (n- четное число), элементы массива z1 сформировать как случайные целые числа из диапазона [10..20], элементы массива z2 сформировать как случайные целые числа из диапазона [15..25]. длину массивов запросить у пользователя. в другом цикле сформировать из z1, z2 массив z3, каждый элемент массива z3 задать как сумму соответствующих элементов z1и z2. отсортировать массивы z1, z2, z3 по возрастанию. задать в программе две процедуры: :
- sub1 для сортировки данного массива методом «пузырька»;
- sub2 для вывода элементов массива.
вывести на чистый экран каждый из массивовz1, z2, z3, ниже он же - отсорти-рованный. каждая процедура должна быть задействована 3 раза.

👇
Открыть все ответы
Ответ:
polyaХеХеХе
polyaХеХеХе
28.06.2020
Uses crt;
var p,a,b,c,xa,xb,xc,ya,yb,yc,ab,ac,bc,xab,yab,xbc,ybc,xac,yac:real;
s:real;
begin
writeln('Введите х координаты вершин а и b');
readln(xa,xb);
writeln('Введите y координаты вершин а и b');
readln(ya,yb);
xab:=xb-xa;
yab:=yb-ya;
ab:=sqrt(xab*xab+yab*yab);
writeln('Введите х координаты вершин а и с');
readln(xa,xc);
writeln('Введите y координаты вершин а и c');
readln(ya,yc);
xac:=xc-xa;
yac:=yc-ya;
ac:=sqrt(xac*xac+yac*yac);
writeln('Введите х координаты вершин b и с');
readln(xb,xc);
writeln('Введите y координаты вершин b и c');
readln(yb,yc);
xbc:=xc-xb;
yab:=yc-yb;
bc:=sqrt(xbc*xbc+ybc*ybc);
p:=(ab+bc+ac)/ 2;
s:=sqrt(p*(p-ab)*(p-bc)*(p-ac));
writeln(s);
end.
4,8(20 оценок)
Ответ:
Ксения654654
Ксения654654
28.06.2020

1) 73=1001001 (2)         2)91=1011011 (2)
     44=101100 (2)               28=11100 (2)

+1001001                            -1011011
     101100                                  11100
                             
  1110101= 117 (10)             111111=63 (10)

 

3)27=11011 (2)

    5=101 (2)
    *11011

          101

   

  +  11011

    00000

  11011

 

10000111=135

 

4)70=1000110 (2)

    7=111 (2)

 - 1000110 | 111

     111         |
    1010= 10 (10)

         -111

          111

           

               0

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