var s,l , o, k :integer; begin writeln ('3-x значное число'); readln (s); k:=s div 100; s:=s mod 100; l:=s div 10; o:=s mod 10; writeln (k,',', l,',', o ); end.
Интернет по сути своей не представляет опасности для подрастающего поколения. Вредоносное влияние оказывают многочисленные сайты и всплывающие окна рекламного характера. Помимо образовательной роли виртуальная реальность таит и множество негативных моментов, в особенности для детей. Это может быть:
незаконный контент: «взрослая» реклама табака, алкоголя, секса, азартные игры, порнография;платные сервисы и услуги, которые оплачиваются отдельно;призывы к асоциальному поведению, насилию и жестокости;пропаганда сексуальной эксплуатации и суицидального поведения;общение на форумах и чатах с мошенниками, аферистами и преступниками под личиной доброжелателей;вынуждение предоставления личной информации ребенка или его семьи, которая может быть использована в преступных целях;Интернет-зависимость.
begin
writeln ('3-x значное число');
readln (s);
k:=s div 100;
s:=s mod 100;
l:=s div 10;
o:=s mod 10;
writeln (k,',', l,',', o );
end.