Трое друзей отправились на велопрогулку. когда велодорожка проходила вдоль шоссе, мимо них на большой скорости пронеслась машина. -— ого, зеленый вольво! — сказал антон — да нет, это же был зеленый рено, — возразил ему коля. — не спорьте, это был синий мерседес, — сказал илья. когда чуть позже они увидели эту машину на обочине (водитель менял колесо), то поняли, что каждый из них верно назвал либо цвет либо марку автомобиля. какой автомобиль видели друзья? зеленый мерседес зеленый рено синий рено синий мерседес синий вольво зеленый вольво

program jumping;

var

 i, j, temp: integer;

 B: array [1..10] of integer;

begin

 for i := 1 to 10 do  

   read(B[i]);  

 for i := 1 to 9 do

   for j := 1 to 10 - i do

     if (B[j] < B[j + 1]) then

     begin

       temp := B[j];

       B[j] := B[j + 1];

       B[j + 1] := temp;

     end;

 writeln('Первое место: ', B[1]);

 writeln('Второе место: ', B[2]);

 writeln('Третье место: ', B[3]);

end.

Объяснение:

program jumping;  // Название программы

var

 i, j, temp: integer;  // Целочисленные переменные:

i - переменная счетчик для цикла forj - переменная счетчик для цикла fortemp - переменная для временного хранения значений массива

 B: array [1..10] of integer;  // Целочисленный массив из 10 чисел

begin  // Начало программы

 for i := 1 to 10 do // Идём с первого по десятый элементы массива

   read(B[i]); // Ввод значений массива

// Сортировка массива в порядке убывания

 for i := 1 to 9 do  // Идём с первого по девятый элементы массива

   for j := 1 to 10 - i do  // Идём с первого по 10 - i элементы массива

     if (B[j] < B[j + 1]) then  // Если последующий элемент больше предыдущего

     begin  // Начало цикла

       temp := B[j];  // Временная переменная = значению массива B с индексом j

       B[j] := B[j + 1];  // Значение массива B с индексом j = значению массива B с индексом j + 1

       B[j + 1] := temp;  // Значение массива B с индексом j = значению временной переменной

     end;  // Конец цикла

 writeln('Первое место: ', B[1]);  // Вывод ответа

 writeln('Второе место: ', B[2]);  // Вывод ответа

 writeln('Третье место: ', B[3]);  // Вывод ответа

end. // Конец программы

// Простая программа на C++, вычисляющая произведение всех натуральных чисел из отрезка [N,M], где N и M - натуральные числа

#include <iostream>

#include <string>

using namespace std;

int main()

{

int N, M, product, i;

cout << "Введите натуральное число N" << endl;

cin >> N;

cout << "Введите натуральное число M, M >= N" << endl;

cin >> M;

if (N > M) { throw std::invalid_argument("M должно быть больше или равно N"); }

product = N;

for(i = N + 1; i <= M; i++) { product = product * i;}

cout << "Произведение натуральных чисел из отрезка [N,M]:" << endl;

cout << product << endl;

}