Alina2007271
07.09.2021 20:37

путь R1,R2,R3 радиус круга Составьте алгоритм который вычисляет квадрат совокупность с площади круга​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
karipovilna
26.03.2021 00:01
Вообще говоря компьютер не может владеть профессиями. 
Профе́ссия (лат. professio; от profiteor «объявляю своим делом»[1]) — род трудовой деятельности человека, владеющего комплексом теоретических знаний и навыков, приобретённых в ходе специальной подготовки.
Потому, что компьютер - это не человек и не имеет собственного мнения или выбора.
Компьютер может выполнять рутинную часть работы  многих профессий, вплоть до того, что вместо целого цеха можно оставить лишь одного человека-наблюдателя/компьютерного оператора.
Так же из-за возможностей компьютера очень осложнились многие профессии, например бухгалтерия. Если б не было компьютеров, не было возможности сохранять и проверять такую кучу данных, то и не надо было подавать столь много разнообразной отчетности, так что черт ногу сломит. Так что бухгалтера могут честно ненавидеть это железо, без которого они как без рук.

А теперь собственно о профессии. Раньше одной из должностей библиотекаря было переписывание книг, ведь со временем они приходили в негодность, стирались и тд. на сегодняшний день старые, но нужные книги сканируются и оцифровываются. Хотя все равно нужна человека при распознавании трудночитаемых мест, поврежденных страниц и тп. 
Еще компьютер обеспечивает более удобный ведения учетности книг, но без человека ему все равно не обойтись, так как не может взаимодействовать с книгами напрямую.
0,0(0 оценок)
Ответ:
ilmir123456789
02.01.2022 09:07
Program project1;
uses
crt,math;
var  s:real;  i,j,f:real;  a:integer;
begin 
writeln('vvedite 1 chislo ');readln(i);
  writeln('vvedite 2 chislo ');readln(j); 
 writeln('vvedite 3 chislo ');readln(f); 
 s:=i; 
 if j<s then s:=j; 
 if f<s then s:=f; 
 if s<0 then 
 begin  
  if i<0 then inc(a);  
  if j<0 then inc(a);  
  if f<0 then inc(a);  
  writeln('kolichestvo otricatelnix ',a:2);
  end 
 else  
begin  
  if i>0 then i:=i*-1;
  if j>0 then j:=i*-1;
  if f>0 then f:=i*-1; 
 end; 
 writeln('min chislo ',s:2:0); 
 readln;
end.     
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота