mrubleva42
?>

Что делать проанализируйте а затем запишите и выберете верные ответы

Информатика

Ответы

Galinova2911

ответ: красная строка - 1 см

Междустрочный интервал - single (одиночный)

Объяснение:

natkuv7

1. Тәртіпті, аңғарымды болу.

2. Өндірістік оқыту шеберінің ғана тапсырған жұмысын орындау.

3. Орындау тәсілін білген жағдайда ғана жұмысқа кірісу. Күдікті жағдайда жұмыс берушімен кеңесу.

4. Жұмыс кезінде өзінің де, өзгенің де көңілін бөлмеу.

5. Жарық жоқ және оның нашар кезінде жұмыс істемеу.

6. Компьютерді рұқсатсыз қоспау және қосылған компьютерді иесіз қалдырмау.

7. Дымқыл немесе су қолмен жұмысқа отырмау.

8. Монитор экраның желі жалғағыштарды, сымдарды қолмен ұстамау.

9. Қондырғыларды рұқсатсыз орнынан қозғамау.

10. Жұмыс орнынан қажетсіз кетпеу.

11. Компьютерді қатты қозғамау.

12. Компьютерлердің үстіне бөгде заттарды қоймау.

13. Жұмыс орнында және бөлмеде тазалық сақтау.

margo929
Var   a: array[1..20,1..20] of integer;   n,m,i,j,min,jm,x: integer; begin   randomize;   write('Введите размеры массива: ');   readln(n,m);   writeln('Исходный массив:');   for i:=1 to n do   begin     for j:=1 to m do     begin       a[i,j]:=random(19)-9;       write(a[i,j]:4);     end;     writeln;   end;   min:=0;   for i:=1 to n do min:=min+a[i,1];   writeln('Сумма элементов 1-го столбца = ',min);   jm:=1;   for j:=2 to m do   begin     x:=0;     for i:=1 to n do       x:=x+a[i,j];     writeln('Сумма элементов ',j,'-го столбца = ',x);     if x<min then     begin       min:=x;       jm:=j;     end;   end;   writeln('Минимальная сумма в ',jm,'-м столбце');   writeln('Полученный массив:');   for i:=1 to n do   begin     for j:=1 to m do     begin       if j<>jm then a[i,j]:=a[i,jm];     write(a[i,j]:4);     end;     writeln;   end;   readln; end.

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

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

Что делать проанализируйте а затем запишите и выберете верные ответы
Ваше имя (никнейм)*
Email*
Комментарий*

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

salahovta
proea
NatalyaAlekseevich1644
pavlino-mkr
Bulanova
Shcherbakov_Artur1781
Шапкина1531
nalekseeva62
zeltos384
agaltsova86
nusupova
Kosov-Aleksandr379
Yekaterina_Popova1413
rimmatrotskaia303
ibarskova1542