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

Склавиатуры вводится 20 чисел, заполнить их в массив, отсортировать и вывести в файл.

👇
Ответ:
мядель
мядель
24.02.2023
Const
  len = 20;
var
  arr : array [1..len] of integer;
  i, i2, min, temp : integer;
  f : text;
begin
  for i := 1 to len do   {считывание массива с клавиатуры}
  begin
    write('arr[', i, '] = ');
    readln(arr[i]);
  end;
  for i := 1 to len do   {сортировка}
  begin
    min := i;
    for i2 := i to len do          {находим позицию наименьшего элемента}
      if arr[i2] < arr[min] then
        min := i2;
    temp := arr[min];              {запоминаем наименьший элемент}
    for i2 := min downto i + 1 do  {сдвигаем массив вправо}
      arr[i2] := arr[i2 - 1];
    arr[i] := temp;                {ставим наименьшее значение в нужное место}
  end;
  AssignFile(f, 'output.txt');  {вывод массива в файл output.txt}
  Rewrite(f);
  for i := 1 to len do
    write(f, arr[i], ' ');
  CloseFile(f);
end.  
4,7(23 оценок)
Открыть все ответы
Ответ:
shmkvnst17
shmkvnst17
24.02.2023

смотри ниже

Объяснение:

Выберите основные функции всех СУБД.

изменение (обновление, добавление и удаление) хранимых данных

обработка данных и вывод результатов

поиск и отбор данных по запросам пользователей

Определите количество полей в таблице базы данных «Магазин».

(поля это столбцы в таблице) их четыре штуки

Чему равно число записей в базе данных «Студенты»?

(запись это строка таблицы)  их три штуки

Какой тип данных нужно задать для поля "Группа" таблицы базы данных "Студенты"?

Текстовый

Какой тип будет у следующих полей: "Номер", "Дата", "Отметка о выполнении"?

Поле "Номер" будет числового типа, поле "Дата" - типа "Дата", а поле "Отметка о выполнении" - логического.

Укажите возможные ввода данных в таблицу базы данных.

Ввод через форму.

Ввод в таблицу в режиме "Ввод и редактирование данных"

Выберите основные объекты графического представления схемы данных.

таблицы и связи, определяемые внешними ключами

вроде так как-то, но не гарантирую.

4,5(86 оценок)
Ответ:
ighjkhh
ighjkhh
24.02.2023

Исходный код:

program par;

var v, a, b, c: integer;

function volume (a, b, c: integer): integer;

begin

 volume := a * b * c

end;

begin

 Readln(a);

 Readln(b);

 Readln(c);

 

 v := volume(a, b, c);

 

 Writeln(v);

end.

Примечание:

В двух скриншотах исходный код в редакторе и результат выполнения программы. В качестве объяснения скажу, что мы объявили функцию volume которая считает объем по переданным в нее измерениям параллелепипеда и возвращает значение. В основной части программы мы вводим измерения и передаем их в функцию, потом выводим результат. Переменная v для хранения результата функции.


Написать программу, использующую ПРОЦЕДУРУ ФУНКЦИЮ для определения объема параллелепипеда (длину, вы
Написать программу, использующую ПРОЦЕДУРУ ФУНКЦИЮ для определения объема параллелепипеда (длину, вы
4,5(15 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ