serjo1216
11.02.2021 17:18

Необходимо написать программу выводящую на экран разницу между максимальным и минимальным значением массива. массив представляет собой последовательность из 10 чисел в диапазоне -10 000 до 10 000. начало программы записано ниже. допишите недостающий фрагмент программы (вместо символов … ). разрешается использовать только переменные описанные в программе. опишите каждую строку в программе при комментариев {}

var a: array [1..10] of integer;
max, min, s, i : integer;

begin

for i : = 1 to 10 do read (a[i]);



end.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
khleskina02
06.09.2021 23:24

c++

#include <iostream>  

using namespace std;  

int main()

{

   int a, b, c, d, e;

   cin >> a >> b >> c >> d >> e;

   if (a <= d and b <= e or a <= e and b <= d) {

       cout << "YES";

   }

   else if (c <= d and b <= e or c <= e and b <= d) {

       cout << "YES";

   }

   else if (c <= d and a <= e or c <= e and a <= d) {

       cout << "YES";

   }

   else {

       cout << "NO";

   }  

   return 0;

}

python

a = int(input())

b = int(input())

c = int(input())

d = int(input())

e = int(input())

if a <= d and b <= e or a <= e and b <= d:

  print("YES")  

elif c <= d and b <= e or c <= e and b <= d:  

  print("YES")  

elif c <= d and a <= e or c <= e and a <= d:  

  print("YES")  

else:  

  print("NO")

Объяснение:

0,0(0 оценок)
Ответ:
таня647
14.04.2020 00:27
//Pascal
  var a,b, I, maxsumm, max : integer;
 
  function summdel(x:integer):integer; //результат - сумма делителей х
  var k,sum:integer;
  begin
    sum:=0;
    for k := 1 to x div 2 + 1 do
      if x mod k = 0 then sum:= sum+k;
    summdel:=sum;
  end;
 
  begin
   writeln('Введите границы a,b ');
   readln(a,b);
    maxsumm := 1;
    max := 1;
    for i := a to b do
     begin
        if summdel(i) > maxsumm then
          begin maxsumm:= summdel(i);
            max := i;
          end;
     end;
     writeLn('Максимальная сумма делителей - ', maxsumm, ' число - ',max)
  end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота