ИНФОРМАТИКА КАКОЙ ДЛИНЫ ОТРЕЗОК НАРИСУЕТ ЧЕРЕПАХА ПРИ ВЫПОЛНЕНИИ ФРАГМЕНТА ПРОГРАММЫ
опустить перо
назад (4)
вперед (5)
назад (1)
вперед (5)
назад (1)
упростите программу ,записав ее минимальным количеством команд

в цикле sum [i]: =sum+mas[i,j];

см файл

за январь нет оплаты так как нет предыдущих показаний

excel таблицы не прикрепляются

дано:

g= 44,1 кгц= 44100 гц

i= 16 бит

t=2 мин=120 сек

v-?

решение:

v=g*i*t

v= 44100гц*16 бит*120 сек= 8467200 бит

v= 8467200/8*1024*1024= 10 мбайт

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

s,i,k: integer;

begin

  randomize;

  for i: = 1 to 8 do begin

        for k: = 1 to 5 do begin

              a[i,k]: = random(20)-10;

              write(a[i,k]: 3,' ');

              if a[i,k] mod 2 = 0 then s: =s+a[i,k];

        end;

        writeln;

  end;

  writeln('s=',s);

end.