Важная информация - история моего народа , культура общения, охрана природы Полезная информация -как правильно питаться , разные конкурсы , дистанционное обучение Безразличная информация - как выиграть в разных играх Вредная информация-Реклама игр для детей старше 18 лет , реклама неприличных книг, разные посты в соц сетях которые являются пропагандой чего то плохого
Program chisl; var a,b,c,d:integer; begin write('Введите a = ' ); readln(a); if a>=0 then d:=d+a; write('Введите b = ' ); readln(b); if b>=0 then d:=d+b; write('Введите c = ' ); readln(c); if c>=0 then d:=d+c; writeln(d); <span>end.</span>