{Даны вещественные числа a,b,c. Определите, существует ли треугольник со сторонами a,b,c?} var a,b,c:real; begin writeln('введите стороны треугольника'); readln(a, b, c); if (a+b>c) and (a+C>b) and (b+c>a) then writeln('треугольник существует') else writeln('треугольник не существует'); end.
{ Дано целое положительное число. Определите, оканчивается ли оно цифрой 7} var N:integer; begin writeln('введите число'); readln(N); if n mod 10= 7 then writeln('оканчивается цифрой 7') else writeln( 'не оканчивается цифрой 7'); end.
Виртуальное общения - знакомая ситуация для нашего времени. Люди знакомится в социальных сетях, общаются, иногда встречаются реальной жизни. Это может быть полезным - пообщаться с человеком, который тебя не знает, услышать его непредвзятое мнение. Сеть дает расслабиться. Ты можешь быть кем угодно, с какой угодно внешностью и характером. Это дает свободу мошенникам и разнообразным шутникам, которым нечего делать, кроме как издеваться над людьми. В этом заключается вред виртуального общения - ты не знаешь с кем переписываешься. Я не против такого общения, но нужно быть осторожным.