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

Даны 2 массива целых чисел а)найти номера их максимальных элементов б)поменять местами максимальные элементы этих массивов

👇
Ответ:
AleksandrYamaha
AleksandrYamaha
22.03.2020

program fantscrin;


   const n = 10;


   var a: array [1..n] of integer;


       b: array [1..n] of integer;


       max_a,max_b,i,k:integer;


begin


   for i:=1 to n do


       a[i]:=random(20);


   for i:=1 to n do


       b[i]:=random(20);


   


   for i:=1 to n do


       write(a[i], '  ');


   writeln('');


   for i:=1 to n do


       write(b[i], '  ');


   


   max_a:=1;


   for i:=2 to n do


       if(a[i]>a[max_a]) then max_a:=i;


   


   max_b:=1;


   for i:=2 to n do


       if(b[i]>b[max_b]) then max_b:=i;


   


   writeln('');


   writeln('Max_a = ',max_a);


   writeln('Max_b = ',max_b);


   


   k:=a[max_a];


   a[max_a]:=b[max_b];


   b[max_b]:=k;


   


   for i:=1 to n do


       write(a[i], '  ');


   writeln('');


   for i:=1 to n do


       write(b[i], '  ');


       


end.

4,6(2 оценок)
Открыть все ответы
Ответ:
В основе лежит формула определения расстояния между двумя точками в прямоугольной системе координат, при этом одна из точек совпадает с началом системы координат. В этом случае искомое расстояние определяется по формуле:
L= \sqrt{a_x^2+a_y^2}
Поскольку в задаче не ставится вопрос определения самого расстояния, достаточно для каждой точки вычислить значение L² и сравнить их.
Окончательно задача сводится к нахождению минимального из значений
a_x^2+a_y^2 по заданным координатам х и у.

var
  ax, ay, bx, by, rx, ry: real;

begin
  writeln('Введите координаты первой точки');
  readln(ax, ay);
  writeln('Введите координаты второй точки');
  readln(bx, by);
  rx := sqr(ax) + sqr(ay);
  ry := sqr(bx) + sqr(by);
  if rx < ry then writeln('Первая точка ближе')
  else
  if rx > ry then writeln('Вторая точка ближе')
  else writeln('Обе точки равноудалены')
end. 
4,4(79 оценок)
Ответ:
litoshikmari
litoshikmari
22.03.2020

#include <iostream>

#include <math.h>

using namespace std;


int main(){

int x1,y2,x2,y2, r1, r2;

cin >> x1 >> y1 >> endl; //вводим координаты первой точки

cin >> x2 >> y2 >> endl; //вводим координаты второй точки

r1 = sqrt(x1*x1 + y1*y1); //находим расстояние от первой

r2 = sqrt(x2*x2+y2*y2) //от второй

if (r1>r2){

cout << "Точка 1 ближе к началу координат";

}

else{

cout << "Точка 2 ближе к началу координат";

}

else if (r1=r2){

cout << "Эти точки равны"

}

return 0;

}

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