Помогите.Информатика 9 класс.Составьте программку которая формирует массив из 16 случайных

Помогите.Информатика 9 класс.Составьте программу которая сформировывает массив из 16 случайных целых чисел от -20 до 20 и обретает элемент с нулевым значением

Задать свой вопрос
1 ответ
// PASCAL

var
  a: array [1..16] of integer;
  i: integer; b: boolean;

begin
  randomize;
  for i := 1 to 16 do a[i] := random(-20, 20);
  for i := 1 to 16 do
    if a[i] = 0 then begin
      if b then write(', ');
      write(i, '-й ');
      b := true;
    end;
  if b then writeln('элемент(ы) равен(ны) нулю') else writeln('В массиве нету частей, одинаковых нулю.');
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт