//PascalABC.NET
//Версия 3.3, сборка 1611 (06.01.2018)
begin
var a:=ArrRandom(ReadInteger('Введите размер массива:'),-20,20); a.Println;
Println('В первой половине положительных:',a[:a.Length div 2].Println.Where(t->t>0).Count);
Println('Во второй половине отрицательных:',a[a.Length div 2:].Println.Where(t->t<0).Count);
end.
Пример:
Введите размер массива: 10
-6 8 -12 -5 -4 16 -1 -14 1 0
-6 8 -12 -5 -4
В первой половине положительных: 1
16 -1 -14 1 0
Во второй половине отрицательных: 2
Программа рабочая, скорее всего ты просто вводил элементы в строчку, а у тебя стоит в чтении переход на новую строку(окончание LN), и паскаль просто не видел никакие числа, кроме первого.
И очень муторный и непонятный код, я переписал немножко:
var
col, a: integer;
begin
col := 0;Read(a);
while a <> 0 do
begin
read(a);
if (a mod 3 = 0) and (a mod 2 = 0) then
col := col + 1;
end;
writeln('количество ', col);
end.
Пример:
6 12 9 36 0
количество 3
<span>2/ точек по вертикали и горизонтали</span>
()()()()()()()()()()()()()()()()
Значение информации для человека.
Определние "информация" для человека становится все шире и шире, с каждым днем все полезнее, и одновременно сложней в усвоении и образовании.
Информация в жизни человека играет важную роль в повседневной жизни, начиная с работы и быта, заканчивая интернет технологиями. Информация помогает человеку сохранить , создать и следовать истории. Благодаря инфоормации человечество имеет возможность передавать и получать знания в изначальной точности. Цифры, буквы, изображения , формулы и даже звуки , все это частицы нашей информации, которую получив, возможно обработать и модернизировать, так и получается, модернизировав информацию мы не стоим на месте, наука и технологии идут вперед.
Информация, помогает человеку изучить и применить свои знания, взяв к примеру одну ситуацию, один человек собирается написать письмо другому человеку, естественно в наше время проще написать и отправить письмо воспользовавшись электронными технологиями, сделать это намного проще и быстрее, пускай и не через компьютер, но через телефон становится все проще и проще. И поэтому для того чтобы попросить человека на расстоянии "купить на обратном пути хлеба" , достаточно всего лишь набрать нужную информацию в сообщении телефона и отправить ее человеку.
P.s.
Что то типа того, может примеры не особо понравятся, можешь отредактировать, вставить что то свое , или добавить.
