Регистрация
Витуся091
15.08.2021 07:32
Информатика
Есть ответ 👍

Последовательно вводятся количества пассажиров которые едут в каждом из n одинаковых вагонов поезда. написать программу которая выдавала бы номера вагонов в которых наибольшее количество свободных мест. ввод коректен. ввод n k - количество вагонов и количество мест в вагоне х1 х2 х3 х4 х5 х6 х7 - разделеные пробелами количества пассажиров в вагонах. вывод разделенные пробелами номера вагонов с наибольшим количеством свободных мест. пример ввод вывод 55 33 44 55 77 32 55 6

154
268
Посмотреть ответы 2

Ответы на вопрос:

merlinina74
merlinina74
4,6(95 оценок)

pascal

 

for i : = 1 to 7 do

  mas[i] : = read(x);

min : = mas[1];

for i : = 1 to 7 do

  begin

  if min > mas[i] then

    begin

    min : = mas[i];

    end;

  end;

writeln(min);

 

массивы и переменные не стал объявлять ибо сами сможете наверника

сначала заполняем массив, потом минимальное число - певый индекс массива если это число оказывается больше какого-то то мы присваевыем переменной min это число.

aromishka
aromishka
4,5(34 оценок)
// pascalabc.net 3.2 begin   var a: =arrrandom(15,10,30).select(x-> x+0.1); write('a='); a.println;   var b: =arrrandom(12,10,30).select(x-> x+0.1); write('b='); b.println;   var c: =a.intersect(b).toarray;   write('c='); c.println;   a: =a.except(c).toarray; write('a новый='); a.println;   b: =b.except(c).toarray; write('b новый='); b.println end. пример решения a=15.1 25.1 29.1 24.1 16.1 29.1 18.1 13.1 10.1 12.1 10.1 13.1 14.1 18.1 24.1 b=24.1 10.1 23.1 15.1 13.1 16.1 22.1 21.1 21.1 28.1 26.1 29.1 c=15.1 29.1 24.1 16.1 13.1 10.1 a новый=25.1 18.1 12.1 14.1 b новый=23.1 22.1 21.1 28.1 26.1

Популярно: Информатика