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

 7 действительных чисел одномерного массива в произвольном порядке вводятся с клавиатуры. Вывести полученный массив в порядке убывания сделать. а то не могу понять как. ​

👇
Ответ:
ngazaryan
ngazaryan
18.12.2021

ответ: Turbo Pascal

program Turbo;

uses Crt;

var

i: integer;

a: array[1..7] of integer;

begin

ClrScr;

write('Введи 7 чисел: ');

for i := 1 to 7 do

  read(a[i]);

for i := 1 to 7 do

  write(a[i], ' ');

ReadKey;

end.

Объяснение:

4,6(36 оценок)
Открыть все ответы
Ответ:
Fokus123123
Fokus123123
18.12.2021
её главный недостаток - то, что она оказалась слишком хорошей в сравнении с Access. Как результат, компания Microsoft перестала поддерживать VFP после версии 9.0, чтобы все же продвигать Access.
Прочие недостатки как раз явились уже следствием - невозможность работы с .NET, с современными средствами доступа к "большим" СУБД и т.д. Далее, отсутствуют защиты данных, данные не шифрованы, открыто лежат в файле.
А так, говорить о недостатках абстрактно - это неверно. Можно говорить о недостатках в сравнении с какой-то другой, более удачной СУБД.
4,5(11 оценок)
Ответ:
322fase322
322fase322
18.12.2021
PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('n=');
  var x:=ArrRandom(n,-5,25); x.Println;
  var y:=ArrRandom(n,-5,25); y.Println;
  var z:=x.Zip(y,(p,q)->p-q).ToArray; z.Println;
  var s:=z.Sum;
  var c:=s<0 ? 'отрицательный' : s=0 ? 'отсутствует' : 'положительный';
  Writeln('Сумма равна ',s,', знак суммы ',c)
end.

Пример
n= 13
2 -5 24 3 23 22 -3 6 -3 -2 9 25 8
17 9 11 8 0 -2 -2 2 25 19 16 21 -4
-15 -14 13 -5 23 24 -1 4 -28 -21 -7 4 12
Сумма равна -11, знак суммы отрицательный
4,6(17 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ