1. составить алгоритм, определяющий максимальное значение из 2-х целых чисел. алг максимум нач цел а, в, mах вывод “введите два целых числа” ввод а, в если а> в mах: =а иначе mах: =в все вывод mах кон

program maximum;

var a,b,max: integer;

begin

 writeln('Введите два целых числа');

 read(a,b);

 if a > b then max:= a

   else max:= b;

 writeln(max);

end.

PascalABC

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

Операционная система — подсистема программного обеспечения и надсистема, в состав которой входят системные и служебные программы.

Система информационных ресурсов включает в себя системы текстовых и графических файлов, звуковых файлов, файлов с видеоинформацией и т. д.

// исходный массив
int mas[10] = {21,13,52,43,9,18,27,34,28,56};
int i = 0;  // счетчик
int index_min; // переменна для хранения индекса минимального элемента в массиве
int min = mas[0]; // сначала принимаем 1ый элемент как минимальный
while (i < 10) {       // проходим по всему массиву
if (mas[i] < min) {   // если текущий элемент меньше минимального
min = mas[i];    // делаем его минимальным
index_min = i;   // запоминаем его индекс
} i++;               // увеличиваем счетчик }
printf("Min = %d ", mas[index_min]);    // выводим минимальный элемент
int Sum = 0;       // переменная для подсчета суммы
i = index_min+1;   // индес следующего элемента - правее за минимальным
while (i < 10) {   // пробегаем по массиву от следующего за минимальным до конца
Sum += mas[i]; // суммируем
i++;           // увеличиваем счетчик
}
printf("Sum = %d ", Sum);  // выводим результат суммы