М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
eraly2
eraly2
19.01.2023 10:09 •  Информатика

Напишите развёрнуто системный анализ электрического пылесоса. С каких элементов он состоит, с Какими физическими законами работает(Закон Ома и т.д.) Заранее за ответ))

👇
Открыть все ответы
Ответ:
ренпарне678
ренпарне678
19.01.2023

#include<conio.h>

#include<stdio.h>

#include <stdlib.h>

#include<time.h>

#define N 25

#define K 3

 

int prime(int num)

{   int i;

   for(i=2;i<=num/2;i++)

       if(num%i==0) break;

   if(i==num/2+1 || num==1) return num;

   else return 0;

}

 

int maxPos(int A[])

{   int i,max,mPos;

   max=0;

   for(i=0;i<N;i++)

       if(A[i]>max)

       {   max=A[i];

           mPos=i;

       }

   return mPos;

}

 

int main()

{   int i,j,X[N],Y[N],pos;

   srand(time(NULL));

   for(i=0;i<N;i++)

   {   X[i]=rand()%30+1;

       Y[i]=prime(X[i]);

   }

   printf("Original array\n");

   for(i=0;i<N;i++)

       printf("%3d",X[i]);

   printf("\nArray-masque of prime numbers\n");

   for(i=0;i<N;i++)

       printf("%3d",Y[i]);

   

   printf("\n\n");

   for(j=0;j<K;j++)

   {   pos=maxPos(Y);

       printf("%3d in position %3d targeted\n",X[pos],pos);

       Y[pos]=-1;

       X[pos]=-1;

   }

 

   j=0;

   for(i=0;i<N;i++)

       if(X[i]!=-1)

       {   Y[j]=X[i];

           j++;

       }

   

   printf("\nResult:\n");

   for(i=0;i<j;i++)

       printf("%3d",Y[i]);

   

   getchar();

   return 0;

}

Объяснение:

4,7(67 оценок)
Ответ:
Сашенька228
Сашенька228
19.01.2023
Program yeah;const N=15;const M=15;var A:array [1..N,1..M] of integer;i,j,b,c,x,y:integer;beginrandomize;write('матрица: ');writeln;for i:=1 to N do begin   for j:=1 to M do beginA[i,j]:=random(100);write(A[i,j]:3);end;writeln;end;c:=1;while c<16 do beginfor i:=1 to N do begin   for j:=1 to M do beginb:=A[1,c];end;end;x:=x+b;c:=c+1;end;writeln('сумма первой строчки: ',x);c:=1;while c<16 do beginfor i:=1 to N do begin   for j:=1 to M do beginb:=A[15,c];end;end;y:=y+b;c:=c+1;end;writeln('сумма последней строчки: ',y);x:=x+y;writeln('общая сумма: ',x);end.
4,7(1 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ