italiankarest
?>

Структурные операторы в языке pascal: развилка и выбор. 1.даны целые цисла m и n. если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных, а если равны, то заменить числа нулями. 2.составить программу, которая по заданному году и номера месяца m определяет количество дней в этом месяце.

Информатика

Ответы

Пономаренко
Первая прога: program pr1; uses crt var m,n: real; begin clrscr; writeln('insert the numbers'); readln(m, n); if m < >   n then begin if m > n then begin n: =m; end else begin m: =n; writeln(m,n); end; end else begin  m: =0; n: =0; writeln(m,n); end; end. вторая прога: program pr2; ues crt var y,m,d,k: integer; begin clrscr; writeln('insert the year); readln(y); writeln('insert the month'); readln(m); if m  > 12 then begin writeln('error'); end; if m mod 2 < > 0   then begin d: = 31; end; if m=2 then begin d: = 28; end; if m mod 2 = 0 then begin d: =30; end; writeln('the number of the days in your month: '); writeln(d); end.
katushak29

что такое вирусы и антивирусы.

компьютерный вирус (кв)  – это программа, способная создавать свои копии (не обязательно полностью с оригиналом), внедрять их в различные объекты или ресурсы компьютерных систем, сетей и производить определенные действия без ведома пользователя. компьютерный вирус (кв)  – это программа, способная создавать свои копии (не обязательно полностью с оригиналом), внедрять их в различные объекты или ресурсы компьютерных систем, сетей и производить определенные действия без ведома пользователя.

антивирус  –  это  программа для защиты компьютера или мобильного устройства от вредоносных программ. термин «вредоносные программы» включает в себя все возможные виды опасных программ, таких, как вирусы, черви, трояны и вирусы- шпионы.

подробнее о вирусах.

различные вирусы выполняют различные  действия:

выводят на экран мешающие  текстовые сообщения  (поздравления, политические лозунги, фразы с претензией на юмор и т.д.);   звуковые эффекты  (гимн, гамма, популярная мелодия);   видео эффекты  (переворачивают или сдвигают экран, имитируют землетрясение, вызывают опадание букв в тексте, выводят картинки и т.д.); замедляют  работу эвм, постепенно уменьшают объем свободной оперативной памяти; увеличивают  износ  оборудования (например, головок дисководов); вызывают  отказ  отдельных устройств, зависание или перезагрузку компьютера и крах работы всей эвм; уничтожают  fat, форматируют жесткий диск, стирают bios, уничтожают или изменяют данные, стирают антивирусные программы; осуществляют научный, технический, промышленный и финансовый  шпионаж; выводят из строя системы  защиты  информации и т.д.

симптомы  вирусного заражения эвм:

замедление работы некоторых программ увеличение размеров файлов (особенно выполняемых) появление не существовавших ранее «странных» файлов уменьшение объема доступной оперативной памяти (по сравнению с обычным режимом работы) внезапно возникающие разнообразные видео и звуковые эффекты появление сбоев в работе ос (в т.ч. зависание) запись информации на диски в моменты времени, когда этого не должно происходить прекращение работы или неправильная работа ранее нормально функционировавших программ.

существует большое число различных  классификаций  вирусов:

по среде обитания:

сетевые  – распространяются по сетям (melissa). файловые  – инфицируют исполняемые файлы с расширениями .exe, .com. также к этому классу относятся макровирусы, которые заражают неисполняемые файлы (например, в ms word или в ms excel). загрузочные  – внедряются в загрузочный сектор диска (boot-сектор) или в сектор, содержащий программу загрузки системного диска (master boot record - mbr). некоторые вирусы записывают свое тело в свободные сектора диска, помечая их в fat как «плохие». файлово-загрузочные  – способны заражать и загрузочные секторы и файлы.
ramzaev09
Program abc;       var       a: array [1..1000] of integer;       i: integer;       sum: integer; begin       sum: =0;     for i: =1 to 1000 do               begin;               readln(a[i]);               if a[i] < 10 then                       sum+=1;               end;       writeln (sum); end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Структурные операторы в языке pascal: развилка и выбор. 1.даны целые цисла m и n. если числа не равны, то заменить каждое из них одним и тем же числом, равным большему из исходных, а если равны, то заменить числа нулями. 2.составить программу, которая по заданному году и номера месяца m определяет количество дней в этом месяце.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Конычева-музей&quot;260
elenalukanova
Lorik-lorik29
Aleksandr-Andrei
tihonovrv477
d892644813661946
chapaevval
КараханянКусков
egorstebenev6
Sergeevna803
Taniagrachev
СмыковаДарья1969
Спивак
Ivan500
Стадник620