Pascal. в двумерном массиве действительных чисел найти сумму четных элементов кратных 4.

program raf105;

var a: array[1..3,1..3] of integer;

i,j,sum: integer;

begin

writeln('вводите 9 чисел по очереди: ');

for i: =1 to 3 do

  for j: =1 to 3 do

  begin

    readln(a[i,j]);

    if (a[i,j] mod 4)=0

      then sum: = sum+a[i,j]

  end;

writeln('сумма чётных элементов кратных четырём: ',sum);

end.

язык программирования pascalabc

Вроде это   program lab1_2;   const   n= 5; m=5;   var   a: array[1..n,1..m] of real;         s,i,j: integer;   begin   randomize;       for i: =1 to n do       begin         for j: =1 to m do           begin           a[i,j]: =random(10);           write(a[i,j]: 4);           end;         writeln;       end;   s: =0;     for i: =1 to n do begin     for j: =1 to m do begin       if (a[i,j] mod 2) = 0 then begin       s: =s+a[i,j];       end;     end;       end;   writeln('summa: ',s);     readln; end.(если ошибся сори! )

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