Задать вопрос

Составить программу в паскале, которая определяет, сколько раз число 10 встречается среди элементов одномерного массива А (12), состоящего из целых чисел и заполненного с клавиатуры.

+3
Ответы (1)
  1. 17 февраля, 21:13
    0
    program zz1;

    const n = 12; / / задаем количество элементов в массиве

    var i, k:integer; / / задаем переменные целого типа

    a:array [1 ... n] of integer; / / описываем массив на n элементов

    begin

    for i:=1 to n do / / получаем n чисел с клавиатуры и записываем их в массив

    read (a[i]);

    writeln; / / переходим на новую строку для вывода ответа

    for i:=1 to n do

    if a[i] = 10 then k:=k + 1; / / проверяем условие и считаем количество элементов равных 10

    writeln (' элементов равных 10 = ', k); / / выводим ответ

    end.
Знаешь ответ на этот вопрос?
Сомневаешься в правильности ответа?
Получи верный ответ на вопрос 🏆 «Составить программу в паскале, которая определяет, сколько раз число 10 встречается среди элементов одномерного массива А (12), состоящего ...» по предмету 📕 Информатика, используя встроенную систему поиска. Наша обширная база готовых ответов поможет тебе получить необходимые сведения!
Найти готовые ответы
Похожие вопросы информатике
1) Вычислите сумму элементов одномерного массива А (10). 2) Вычислите произведение элементов одномерного массива А (10). 3) Вычислите сумму четных чисел в массиве А (10). 4) Задан массив из N элементов. Определить максимальный (минимальный) элемент.
Ответы (1)
1) Найти сумму отрицательных элементов массива целых чисел. Размерность массива 10. Заполнение массива осуществить случайными числами от - 20 до 20. 2) Найдите сумму чётных элементов массива целых чисел. Размерность массива 20.
Ответы (1)
For i:=1 to N do Begin write ('C[', i,']='); readln (C[i]); end * Приведенный фрагмент программы, предназчен для 1 вывода массива в столбец 2 вывода массива в строку 3 формирования массива случайными числами 4 ввода массива с клавиатуры For i:=
Ответы (1)
1. Заполнить массив с клавиатуры целыми числами. Вывести элементы этого массива на экран. (Добавить комментарии) 2. Заполнить массив таким образом, чтобы каждый его элемент был равен утроенному значению его порядкового номера (индекса). 3.
Ответы (1)
1. Найдите наибольший элемент одномерного массива, состоящего из 12 элементов. Элементы задаются датчиком случайных чисел из интервала [-25,31] 2. Массив А вводится с клавиатуры.
Ответы (1)