Створіть проєкт, у якому вводяться кількості відвідувачів музею в кожний з 10 днів і визначається, скільки днів кількість відвідувачів перевищува-ла 100 осіб. Використайте одновимірний масив (список). Збережіть проєкт 30 у папці з іменем Завдання 5.2.2, створеній у вашій папці. Lazarus

Відповідь:

Ось приклад програми на Pascal, яка дозволяє вводити кількість відвідувачів музею в кожний з 10 днів та визначає, скільки днів кількість відвідувачів перевищувала 100 осіб:

scssCopy code

program MuseumVisitors; const NUM_DAYS = 10; var visitors: array[1..NUM_DAYS] of Integer; i, count: Integer; begin count := 0; writeln('Enter the number of visitors for each day:'); for i := 1 to NUM_DAYS do begin write('Day ', i, ': '); readln(visitors[i]); if visitors[i] > 100 then count := count + 1; end; writeln(); writeln('Number of days with more than 100 visitors: ', count); readln(); end.

Пояснення до програми:

Ми визначаємо константу NUM_DAYS, яка вказує на кількість днів, для яких ми будемо вводити кількість відвідувачів.

Ми створюємо масив visitors типу array[1..NUM_DAYS] of Integer, який міститиме кількість відвідувачів для кожного дня.

Ми вводимо кількість відвідувачів для кожного дня за допомогою циклу for. У кожній ітерації циклу ми викликаємо readln для зчитування введеної кількості відвідувачів, та перевіряємо, чи перевищує ця кількість 100 осіб. Якщо так, то збільшуємо лічильник count.

Після того, як ми ввели кількість відвідувачів для кожного дня, ми виводимо на екран кількість днів, коли кількість відвідувачів перевищувала 100 осіб.

Останній readln слугує для того, щоб програма не закінчувалась одразу

Ответ:

ответ на прикреплённом фото