Var f1,f2:text;
a,b,t,t1:integer;
begin
assign(f1,'input.txt');
reset(f1);
assign(f2,'output.txt');
rewrite(f2);
readln(f1,a,b,t);
t1:= t mod (2*a+2*b);
if (t1>=0)and(t1<a) then writeln(f2,'S')
else if (t1>=a)and(t1<a+b) then writeln(f2,'E')
else if (t1>=a+b)and(t1<2*a+b) then writeln(f2,'N')
else writeln(f2,'W');
close(f1); close(f2);
end.
Program1; Uses crt;
var a: integer;
begin clrscr;
Writeln('введите число");
Readln(a);
if a>0 then Writeln('a-положительное');
if a<0 then Writeln('a-отрицательное');
if a=0 then Writeln('a=0');
Readln;
End.
Только я вот не понял, зачем фотка прикреплена к вопросу?..
Что такое компьютерный вирус и компьютерный червь?
Компьютерный вирус и компьютерный червь — это вредоносные программы, которые способны воспроизводить себя на компьютерах или через компьютерные сети. При этом пользователь не подозревает о заражении своего компьютера. Так как каждая последующая копия вируса или компьютерного червя также способна к самовоспроизведению, заражение распространяется очень быстро. Существует очень много различных типов компьютерных вирусов и компьютерных червей, большинство которых обладают высокой способностью к разрушению.Что такое компьютерный вирус и компьютерный червь?

Компьютерный вирус и компьютерный червь — это вредоносные программы, которые способны воспроизводить себя на компьютерах или через компьютерные сети. При этом пользователь не подозревает о заражении своего компьютера. Так как каждая последующая копия вируса или компьютерного червя также способна к самовоспроизведению, заражение распространяется очень быстро. Существует очень много различных типов компьютерных вирусов и компьютерных червей, большинство которых обладают высокой способностью к разрушению.
Что нужно знать о компьютерных вирусах и червях
Вредоносное программное обеспечение из подкласса вирусов и червей включает:
Email-WormIM-WormIRC-WormNet-WormP2P-WormVirusКомпьютерные черви
Большинство известных компьютерных червей распространяется следующими способами:
в виде файла, отправленного во вложении в электронном письме;в виде ссылки на интернет - или FTP-ресурсв виде ссылки, переданной через сообщение ICQ или IRчерез пиринговые сети обмена данными P2P (peer-to-peer)некоторые черви распространяются как сетевые пакеты. Они проникают прямо в компьютерную память, затем активируется код червя.
Компьютерные черви могут использовать ошибки конфигурации сети (например, чтобы скопировать себя на полностью доступный диск) или бреши в защите операционной системы и приложений. Многие черви распространяют свои копии через сеть несколькими способами.
Вирусы
Вирусы можно классифицировать в соответствии с тем, каким способом они заражают компьютер:
Файловые вирусывирусы загрузочного сектораМакровирусыВирусные скрипты
Любая программа данного подкласса вредоносного ПО в качестве дополнительных может иметь и функции троянской программы.
Как защититься от компьютерных вирусов и червей
Рекомендуется установить антивирус: программное обеспечение для защиты от вредоносных программ на все свои устройства (включая ПК, ноутбуки, компьютеры Mac и смартфоны). Решение для защиты от вредоносных программ должно регулярно обновляться, чтобы защищать от самых последних угроз. Хороший антивирус (такой какАнтивирус Касперского) обнаруживает и предотвращает заражение ПК вирусами и червями, а Kaspersky Internet Security для Android— отличный выбор для защиты смартфонов на базе Android. В «Лаборатории Касперского» созданы продукты для следующих устройств:
ПК на базе Windows;компьютеры Mac;смартфоны;планшетов
Ответ:Немецкая сторона понесла на 12,5% потерь больше
Объяснение:
800-100%
500- x%
x=62,5. Значит, потери составили 37,5%
400-100%
300-x%
x=75 Значит, потери составили 25%
37,5%-25=12,5%