Проанализируй диаграмму. Запиши верные данные в таблицу:«Факторы, влияющие на здоровье человека».

Подожди это по чем? ответь мне и я напишу я просто не знаю по чем это это по информатике?

Объяснение:

здравоохранение 20%

экологическая обстановка 20%

Наследственность 12%

Образ жизни 48%

(можно "лучший ответ"?)

program pr;

var mas: array[1..40] of integer;

i, sum: integer;

begin

randomize;

for i: =1 to 40 do mas[i]: =random(20);

for i: =1 to 40 do if mas[i]< =10 then sum: =sum+mas[i];

writeln ('сумма равна ', sum);

readln;

end.

программу проверил все работает

режим разметки страницы,режим структуры,режим чтения.режим веб документа-