Отсутствия защиты на ПК пользователя, может гразить ему потерей очень важных данных. Если брать во внимания, последнее вредоносное программное обеспечение 2013 года, то от зловреда, можно только собственным умом. Никакие антивирусные программы не дают 100% защиты от вирусов. А само вредосное ПО, может нанести вред компьютеру от простейшего копирование различной конфиденциальной информации третьими лицами, до полной порчи вашей операционной системы.
Var a,s1,s2:integer; begin read (a); if (a>=1000)and (a<=9999)then begin s1:=(a mod 10) + ((a mod 1000) div 100); s2:=(a div 1000) + ((a mod 100) div 10); if (s1>s2)then writeln ('Сумма цифр,стоящих на четных местах больше суммы цифр, стоящих на нечетных местах'); if (s1<s2)then writeln ('Сумма цифр,стоящих на нечетных местах больше суммы цифр, стоящих на четных местах'); if (s1=s2)then writeln ('Сумма цифр,стоящих на четных местах равна сумме цифр, стоящих на нечетных местах'); end else writeln ('Вы ввели не 4-ёхзначное число'); end.
Ирина и Тимур = не информатика Камилла и Эльдар = не информатика Тимур = боится физики Камилла, Тимур = не литература, но плавают Тимур и Камилла = поздравили математика Ирена = cожалеет мало времени на литературу победители по: физике, математике, информатике, литературе и географии. Залим - информатика (Ирена и Тимур = учит, Камилла и Эльдар = интересуются) Тимур - не физика, не литература, не математика, не информатика, значит география Камилла - не информатика, не литература, не математика, уже не география => Физика Ирена - не информатика, не физика, не география => Литература Эльдар - Математика