В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
CailiVinchisiter
CailiVinchisiter
18.06.2020 16:56 •  Информатика

5 Отметьте все функции операционной системы. а) организует работу с файлами и папками
b) распределяет память
c) регулирует расход бумаги для принтера
d) обеспечивает обмен данными с аппаратными средствами
е) выполняет тестирование
это c)​

Показать ответ
Ответ:
Шпунтя
Шпунтя
01.12.2020 21:50

#include <stdio.h>

#include <stdlib.h>

#include <time.h>

int main(){

   int arr[10],even[10], cur = 0, tmp;

   srand(time(0));

   puts("Source array:");

   for (int i = 0; i < 10; i++){   //генерация массива +

       arr[i] = rand() % 30;   //отбор четных элементов

       printf("%d\n", arr[i]);

       if (arr[i] % 2 == 0){

           even[cur] = arr[i];

           cur++;

       }

   }

   for (int i = 0; i < cur; i++)   //сортировка пузырьком по убыванию

       for(int j = 0; j < cur - i - 1; j++)

           if (even[j+1] > even [j]){

               tmp = even[j+1];

               even[j+1] = even[j];

               even[j] = tmp;

           }

   puts("Sorted array:");  //печать сортированного массива

   for (int i = 0; i < cur; i++)

       printf("%d\n", even[i]);

   return 0;

}

Объяснение:

Компилятор gcc 8.2.0

0,0(0 оценок)
Ответ:
marinalebedeva5
marinalebedeva5
08.11.2021 17:22

4:

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

   i,min,max : integer;

begin

   for i:= 1 to 3 do

   begin

       write('a[',i,'] = ');

       read(a[i]);

       writeln;

   end;

   min:= a[1];

   max:= a[1];

   for i:= 1 to 3 do

   begin

       if a[i] < min then

       begin

           min:= a[i];

       end;

   end;

   for i:= 1 to 3 do

   begin

       if a[i] > max then

       begin

           max:= a[i];

       end;

   end;

   writeln('min = ',min);

   writeln('max = ',max);

end.

5:

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

   i,max : integer;

begin

   for i:= 1 to 5 do

   begin

       write('a[',i,'] = ');

       read(a[i]);

       writeln;

   end;

   max:= a[1];

   for i:= 1 to 3 do

   begin

       if a[i] > max then

       begin

           max:= a[i];

       end;

   end;

   writeln('max = ',max);

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота