Сформировать одномерный массив из элементов массива t(4, 4), умноженных на 0, 25

var

  a: array [1..16] of real;

  t: array [1..4,1..4] of integer;

  i,j,k: byte;

begin

  randomize;

  for i: =1 to 4 do begin

    for j: =1 to 4 do begin

    t[i,j]: =random(9)+1;

    write (t[i,j]: 4);

    end;

    writeln;

  end;

  k: =1;  

  for i: =1 to 4 do

    for j: =1 to 4 do begin

    a[k]: =t[i,j]*0.25;

    write (a[k],' ');  

    k: =k+1;  

    end;

  readln;

end.

var

a,b,c: integer;

begin

readln(a); readln(b); readln(c);

if a mod 2 < > 0 then

  writeln('первое нечетное')

else if a mod 2 = 0 then  

  writeln('первое четное');

   

  if b mod 2 < > 0 then

  writeln('второе нечетное')

else if b mod 2 = 0 then  

  writeln('второе четное');

   

  if c mod 2 < > 0 then

  writeln('третие нечетное')

else if c mod 2 = 0 then

  writeln('третие четное');

   

end.

1. норберт винер — американский учёный, и философ, основоположник кибернетики и теории искусственного интеллекта. в 1945—47 годах у винера возникла идея о необходимости создания единой науки, изучающей процессы хранения и переработки информации, и контроля.

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

3.термин “гипертекст” был придуман тедом нельсоном в 1962 году, а впервые опубликован в 1965 году в описаниях гипертекстовой системы для хранения и поиска текста, названной нельсоном системой xanadu.

4. тим бернерс-ли и в меньшей степени, роберт кайо. тим бернерс-ли 1980 году для собственных нужд написал программу «энквайр» которая заложила концептуальную основу для всемирной паутины

5. леона́рд э́йлер — швейцарский, и российский и механик, внёсший вклад в развитие этих наук.   в честь леонарда эйлера