• В соревновании принимают участие 30 спортсменов. Номера и результаты спортсменов хранятся в двух одномерных массивах. Определите и выведите на экран тех участников, которые набрали менее 70 баллов.

    паскаль

Ответы 1

  • //PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)begin  var n:=0;  var a: array[0..29] of integer; //массив с номерами участников  for var i := 0 to 29 do a[i] := i; //Заполняем номерами  var b:=ArrRandom(30,0,100); //Заполним сл.числами массив ст результатами  for var i:=0 to 29 do     if b[i]<70 then println('Номер участника:',a[i],' Баллы:',b[i]);end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years