Дано перелік підручників для 9 класу з різних предметів. Розробіть програму створення списку, елементами - id1806081120221206 от dramidontova 06.12.2022 12:14

Question

Информатика: Дано перелік підручників для 9 класу з різних предметів. Розробіть програму створення списку, елементами якого є назви підручників для 9 класу з різних предметів. Визначте загальну кількість підручників; чи є у переліку підручники з інформатики і алгебри; номер позиції підручника з фізики.

dramidontova · Accepted Answer

В задании не сказано, откуда берутся исходные данные, поэтому будем вводить их с клавиатуры. Сначала ведем общее количество данных (не факт, что данные за месяц снимались строго ежедневно), а затем сами данные. Это позволит заодно осуществить контроль ввода.

var
n,s,t,i:integer;
begin
Write('Укажите количество данных: ');
Read(n);
Writeln('Теперь вводите данные');
s:=0;
for i:=1 to n do
    begin
    Read(t);
    s:=s+t
    end;
Writeln('Средняя температура за месяц составила ',s/n:0:1)
end.

Пример решения

Укажите количество данных: 11
Теперь вводите данные
27 29 26 31 24 23 27 30 31 28 25
Средняя температура за месяц составила 27.4

MOGZ ответил