Решите .(в паскале или конструкторе) получить массив из n случайность лежащих в интервале от -50 до 100, определить каких чисел в нем больше четных положительных или нечетных отрицательных?
Var i,n,sum1,sum2:integer; mas:array[1..999] of integer;
begin sum1:=0;//Нечет. Отриц. sum2:=0; //Чет. Положит. randomize; readln(n); for i:=1 to n do mas[i]:=random(151)-50; for i:=1 to n do if (mas[i]>0) AND (mas[i] mod 2 = 0) then sum2:=sum2+1 else if (mas[i]<0) AND (mas[i] mod 2 <> 0) then sum1:=sum1+1; if sum1=sum2 then writeln('Поровну'); if sum1>sum2 then writeln('Больше нечетных отрицательных'); if sum1<sum2 then writeln('Больше четных положительных'); end.
Тим Бернерс-Ли, британский ученый, изобрел World Wide Web (WWW) в 1989 году. Изначально эта разработка была задумана, чтобы удовлетворить спрос на автоматический обмен информацией между учеными в университетах и институтах по всему миру.Первый сайт в мире был посвящен World Wide Web - самому проекту и размещался на компьютере Бернерса-Ли.Веб-сайт описывал основные свойства Интернета; как получить доступ к документам других людей и как настроить свой собственный сервер.30 апреля 1993 программное обеспечение World Wide Web стало общественным достоянием.С этого времени, Web изменил мир и стал самым мощным средством коммуникации в мире.
1) hdd и ssd - диск с магнитными дисками и твердотельный диск 2) приведение к стандартному виду ячеек памяти диска 3) на 2 области: Область хранения файлов (содержимое книги) Каталог (оглавление книги) содержит имя файла и указание на номер начального сектора на диске, объем файла, дату и время его создания. 4) бит 5) потому что когда файл пишется на диск - он может писаться в разных его концах. из-за этого для его считывания уходит много времени для перемещения головок 6) порядок, определяющий организации, хранения и именования данных на носителях информации в компьютерах, а также в другом электронном оборудовании 7) под файлом принято понимать ограниченный объём информации, существующей физически в ЭВМ, системе ЭВМ или сетях ЭВМ 8) дата создания, имя, размер 9) - имя файла и тип содержимого; - дата и время создания файла; - имя владельца файла; - размер файла; - права доступа к файлу; - метод доступа к файлу. 10) Символ * - заменят любое количество символов Символ ? - заменяет ровно один символ 11) Загрузочный сектор (Boot Record) Таблица размещения файлов(File Allocation Table — сокращенно FAT) Корневой каталог (Root Directory) 12) все что угодно
i,n,sum1,sum2:integer;
mas:array[1..999] of integer;
begin
sum1:=0;//Нечет. Отриц.
sum2:=0; //Чет. Положит.
randomize;
readln(n);
for i:=1 to n do
mas[i]:=random(151)-50;
for i:=1 to n do
if (mas[i]>0) AND (mas[i] mod 2 = 0) then
sum2:=sum2+1
else
if (mas[i]<0) AND (mas[i] mod 2 <> 0) then
sum1:=sum1+1;
if sum1=sum2 then
writeln('Поровну');
if sum1>sum2 then
writeln('Больше нечетных отрицательных');
if sum1<sum2 then
writeln('Больше четных положительных');
end.