Регистрация
alinabilalova161
02.08.2021 23:49
Информатика
Есть ответ 👍

1.Ввести масив дійсних чисел розміром n, n вводитися з клавіатури. Знайти його найбільший і найменший елементи і поміняти їх місцями. Знайти суму і добуток всіх
елементів масиву.
2.В одновимірному масиві, що складається з n дійсних елементів, обчислити:

- максимальний елемент масиву;

- суму елементів масиву, розташованих до останнього додатного елемента.
3.Визначити, чи є в одновимірному числовому масиві A з n елементів, хоча б одна
пара співпадаючих за величиною сусідніх елементів.

288
356
Посмотреть ответы 1

Ответы на вопрос:

SHAHRUKH575
SHAHRUKH575
4,4(69 оценок)
Код вот такой, блок-схему сможешь написать по комментам var  a: array [1..100] of integer;   n, i, max, min: integer;   ans: real; begin  writeln('введите кол-во эллементов массива (от 1 до 100)');   readln(n); // cчитывается кол-во элементов  read(a[1]); // cчитывается первый элемент массива   max : = a[1]; //a[1] принимается за максимальный элемент  min : = a[1]; //a[1] принимается за минимальный элемент   for i : = 2 to n do begin // цикл от 2 до n    read(a[i]); // cчитывается i-тый элемент массива    if (max < a[i]) then // если max меньше нового эллемента обновить max      max : = a[i]    else if (min > a[i]) then // если min больше нового эллемента обновить min      min : = a[i];   end;   ans : = max / min; //присвоить переменной ans ответ на   writeln(ans); // вывести ответ end.

Популярно: Информатика