Паскаль 1. дана последовательность n целых чисел, введенных с клавиатуры. получить сумму и количество тех членов последовательности, которые : а) имеют четное значение, четный номер и отрицательные; б) делятся на 3 и не делятся на 5; в)

А)uses crt; const n=20; var a: array[1..n] of integer; i,s,k: integer; begin randomize; s: =0; k: =0; for i: =1 to n do begin a[i]: =random(100)-50; writeln(a[i]); end; writeln; for i: =1 to n do begin if (a[i] mod 2=0) and (i mod 2 =0) and (a[i]< 0) then begin inc(k); s: =s+a[i]; end; end; writeln(s); writeln(k); end. б)uses crt; const n=20; var a: array[1..n] of integer; i,s,k: integer; begin randomize; s: =0; k: =0; for i: =1 to n do begin a[i]: =random(100)-50; writeln(a[i]); end; writeln; for i: =1 to n do begin if (a[i]mod 3=0) and (a[i] mod 5< > 0) then begin s: =s+a[i]; inc(k); end; end; writeln(s); writeln(k); end. в)uses crt; const n=20; var a: array[1..n] of integer; i,s,k: integer; begin randomize; s: =0; k: =0; for i: =1 to n do begin a[i]: =random(100)-50; writeln(a[i]); end; writeln; for i: =1 to n do begin if (abs(a[i]))> (i-2) then begin inc(k); s: =s+a[i]; end; end; writeln(s); writeln(k); end.

1.Люди не слышать ультразвук, а многие животные не только чувствуют эти очень высокие звуки, но даже используют их для ориентации. Летучие мыши используют технику эхолокации — испускают ультразвуковые сигналы и точно оценивают отраженное эхо при слуха. ...

2.Какие птицы и животные производят ультразвук

Масляная птица Steatornis caripensis, масляная птица Южной Америки, спит в пещерах днем и кормит ночью. ...

Летучие мыши Летучие мыши используют ультразвук вместо глаз, чтобы найти дорогу в темноте и поймать насекомых. ...

Дельфины и киты ...

Моль ...

мышей ...

Лягушки ...

Кузнечик ...

3.Ультразвуковой датчик расстояния определяет расстояние до объекта, измеряя время отображения звуковой волны от объекта. Частота звуковой волны находится в пределах частоты ультразвука, что обеспечивает концентрированное направление звуковой волны, так как звук с высокой частотой рассеивается в окружающей среде меньше.

4.

5.

может здесь, что-то выберешь для себя

Объяснение:

Информатизация общества – это повсеместное внедрение комплекса мер, направленных на обеспечение полного и своевременного использования достоверной информации, обобщенных знаний во всех социально значимых видах человеческой деятельности. В настоящее время по своему социальному значению информатизация общества сопоставима с его индустриализацией. Эта новая отрасль определяет технический уровень хозяйства.

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

Под информационной инфраструктурой понимается структура системы информационного обеспечения всех потребителей информации, которая предоставляет им возможность использования новых информационных технологий на базе широкого применения информационно-вычислительных ресурсов и автоматизированной системы связи.

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