1)x = (input('x= '))
y = (input('y= '))
z = (input('z= '))
c = ((x % 3 == 0) and (y % 3 == 0) and (z % 3 == 0))
print(
else:
2)uses crt;
var x,y:real;
f1,f2:boolean;
begin
clrscr;
writeln('Введите 2 числа:');
readln(x,y);
f1:=(x>2)and(y>3);
f2:=(x>1)and(y>-2);
writeln(f1);
write(f2);
readln
end.
3)uses crt;
var a,r:real;
begin
clrscr;
write('Введите сторону квадрата и радиус круга-> ');
readln(a,r)
if sqr(a)>pi*sqr(r) then write('У квадрата') else write('У круга');
readln;
end.
5)uses crt;
Var a, i, n, S: integer;
Begin
Write('Vvedite n '); readln(n);
S:=0;
For i:=40 to 140 do
begin
read(a);
if (a mod 6 =0) then S:=S+a;
end;
Writeln(S);
End.
Являясь ведущим немецким специалистом в области безопасности компания Avira имеет большой опыт разработки и поддержки своих решений. Наряду с программами для рабочего места компания предлагает профессиональные решения для комплексной защиты сетей на различных уровнях. Сюда, помимо прочего, относятся программы для рабочих станций, файловых серверов, серверов для электронной почты и веб-серверов. Даже шлюзовыми компьютерами можно управлять как и обычными компьютерами для рабочего места с центральной консоли управления для всей операционной системы. Помимо программ управления отдельными решениями существуют программы безопасности для PDA, смартфонов и встроенных устройств. Существенный вклад в безопасность вносит программа Avira AntiVir Personal, которая используется миллионами частных лиц.
Компания Avira, находящаяся в городе Теттнанг на Боденском озере является одним из самых крупных региональных работодателей. Она имеет несколько филиалов в Германии и партнеров в Европе, Азии и Америке. Несколько дюжин сотрудников в распределенных лабораториях круглые сутки борются с локальными и глобальными угрозами на поле битвы с вирусами. Эта работа подтверждается многократными наградами: VB 100% списка с вирусами или повторный сертификат от TЬV.
Являясь лидером технологий для Unix, компания Avira разрабатывает ответственные стандарты. К другим инновациям компании Avira относятся антивирусные программы для Symbian, а также первая в мире защита от вирусов с сертификатом SAP.
Наряду с интеллектуальными технологиями компания Avira под лозунгом „Больше, чем просто безопасность“ предлагает ориентированные на пользователей консультации и индивидуальную поддержку с собственных экспертов. Важный вкладом в безопасность и дополнительной защитой для сетей компаний является использование пользователями программы Avira AntiVir Personal.
Награды и сертификаты продукции Avira, а также сотрудничество с такими предприятиями, как IBM, Sun, Novell, AVM или Clearswift подчеркивают работо и компетентность компании. Решения компания Avira продаются во всем мире и благодаря обученным, авторизованным партнерам доступны везде.