Задать вопрос Регистрация
Помочь другим

  • Пожалуйста!) напишите программу которая вычисляет сколько раз введенное с клавиатуры число встречается в массиве ( в pascal)

Ответы 1

  • const n = 10;var  a: array[1..n] of integer;  i, x, count: integer;begin  readln(x);  for i := 1 to n do begin    a[i] := random(100);    write(a[i], ' ');    if(a[i] = x) then inc(count);  end;  writeln;  writeln('Число ', x, ' встречается в массиве ', count, ' раз');end.

    • Автор:

      isabelle
    • 5 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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