Есть ответ 👍

Устоновите соответствия: а) веб-сервис 1) обеспечивает обмен файлами между компьютерами б) ip-телефония 2) используется для организации телефонных разговоров в) электронная почта 3) обеспечивает пересылку электронных писем г) службы доступа к файлам 4) предоставляет возможности для поиска сведений в интернете д) поисковые службы 5) предоставляет доступ к гипертекстовых документов

164
499
Посмотреть ответы 2

Ответы на вопрос:


В3 г5 д4 а и б не знаю

program massive;

uses crt;

const n = 10;

var

  a: array [1..n] of integer;

  i: integer;

  x: integer;

begin

    randomize;

    for i: = 1 to n do

    begin

      a[i] : = random(101);

      a[i] : = a[i] - 50;

    end;

    clrscr;

    writeln('massive: ');

    for i: = 1 to n do

        write(a[i]: 4);

    writeln;

    readln;

    for i: =1 to n do

      if (a[i] > 0) then x: =x+1;

    write ('x = ', x);

end.

Популярно: Информатика