9класс

Страница 72-86 §2.2 номер 10, ГДЗ по информатике за 9 класс к учебнику Босовой

Одномерные массивы целых чисел. Страница 72-86 §2.2 номер 10

страницы 72-86 §2.2 номер 10 учебнику по информатике 9 класс Босова
  • program z_10;

    const

      n = 50;

      c = 170;

    var

      i, k: integer;

      a: array [1..n] of integer;

    begin

      k := 0;

      randomize;

      for i := 1 to n do

      begin

        a[i] := random(51) + 150;

        write(a[i], ' ')

      end;

      for i := 1 to n do

        if a[i] >= c then k := k + 1;

      writeln;

      writeln('Количество претендентов: ', k)

    end.

Сообщить об ошибке
Закрыть