mulyugina365
?>

Осязание обоняние вкус слух зрение все вместе одним словом как?

Информатика

Ответы

kseniay2006548
Винформатике - виды информации, а так органы чувств.
aivanova
Вид информации по способу восприятия
lagutkins
Var i, s: integer;       a: array[1..10] of integer; begin        for i : = 1 to 10 do begin              a[i] : = random(10) - 5;                 if(a[i] < 0) and (i mod 2 = 0) then s : = s + a[i];           write(a[i]: 3);         end;       writeln(#10, 'сумма отрицательных элементов: ', s); end.
Amelin-Alipova
Const   n1 = 20;   m1 = 20; var   a: array[1..n1, 1..m1] of integer;   b: array[1..m1] of integer;   i, j, m, n: integer; begin   write('введите через пробел число строк и столбцов массива: ');   readln(n, m);   randomize;   writeln('исходный массив');   for i : = 1 to n do   begin       for j : = 1 to m do       begin           a[i, j] : = random(101) - 50;           write(a[i, j]: 4)       end;       writeln   end;   writeln('сформированный массив');   for j : = 1 to m do   begin       i : = 1;       while (i < = n) and (a[i, j] > = 0) do i : = i + 1;       if i < = n then b[j] : = a[i, j] else b[j] : = -99;       write(b[j]: 4)   end;   writeln end. тестовое решение: введите через пробел число строк и столбцов массива: 3 10 исходный массив   -11 -18 -42 -22  -9    2  21  15  40  -3     4  -5  40 -13 -44 -37  43  47    1 -39   20  50  21 -18 -10    6  12 -10  43 -37 сформированный массив   -11 -18 -42 -22  -9 -37 -99 -10 -99  -3

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Осязание обоняние вкус слух зрение все вместе одним словом как?
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Джамал1009
IP1379
Нескажу25
beaevgen711
sav4ukoxana7149
coleslow12
Svetlana
knigi21212
muraveiynik
sve-lysenko
sashulyah3183
ksen1280
tvshi
yocrew13
andrey4work918