Python Напишите вс функцию, которая по остатку от деления на 12 своего аргумента-года определяет и возвращает в основную программу название года по китайскому календарю. Соответствие: 0 обезьяны 1 петуха 2 собаки 3 свиньи 4 мыши 5 быка 6 тигра 7 кролика 8 дракона 9 змеи 10 лошади 11 овцы Воспользуйтесь вс функцией в основной программе, которая в цикле пользователя ввести год, с вс функции определяет его название и печатает его (печать названия в основной программе Еще одна вс функция должна обеспечить правильность ввода данных в программу. Основная программа должна работать до тех пор, пока пользователь на во Завершить? (да/нет): » ответит «да».

l = ['Обезьяна', 'Петух', 'Собака', 'Свинья', 'Мышь', 'Бык', 'Тигр', 'Кролик', 'Дракон','Змея', 'Лошадь', 'Овца']

while True:

year = int(input('Введите год: '))

for i in range(0,12):

if year%12==i:

print(l[i])

q = str(input('Завершить: (да/нет) '))

if q == 'да':

print('До свидания!')

break

На сегодняшний день компьютеры стали очень важной частью, скажем даже инструментом, в разных сферах медицинской деятельности. С компьютерных технологий медицина стала развиваться, совершенствоваться, что обеспечило высокую точность исследований, данных и результатов работы. Сейчас в ногу с современностью старается шагать каждое учреждение, потому как это не только новые технологии, но увеличенное количество пациентов. Медицина собой представляет очень сложную науку, где даже самый профессиональный специалист может допустить ошибку, в результате чего сложно поставить диагноз. В этом случае свою роль сыграет компьютерная которая намного облегчит работу врача. Благодаря такой можно получить точный диагноз и за короткий период времени. То, что последнее слово всегда за врачом, это конечно, безусловно, но компьютер ускорить процесс принятия решения, которое здоровье, а иногда и жизнь человека. Современные медицинские заведения давно перешли от бумажной работы к компьютерной, что бы врачи могли больше уделить времени и внимания пациенту, нежели бумажной работе. Все данные по пациентам занесены в компьютер, таким образом, работа не стоит на месте, медицинские учреждения процветают, а пациенты выздоравливают. Кроме этого, компьютерные технологии врачам проводить различные медицинские обследования, вплоть до исследования внутренних органов человека. Еще компьютеры позволяют установить, на сколько сильно влияет загрязненный воздух на заболеваемость людей в том или ином районе населенного пункта. Также компьютерные технологии очень большую роль играют в медицинских исследованиях. Например, при компьютера можно изучить последствия удара для позвоночника или черепа головы человека, или всего скелета человеческого в целом, скажем, после автомобильной аварии. Компьютерные технологии также заработали себе отличную репутацию в отрасли, связанной с донорскими органами, которые необходимы пациентам для трансплантации. Сюда же можно и отнести обучение медработников, что тоже имеет большое значение в работе медицины. Это происходит в виде «игры», компьютер выступает в виде пациента, а медработник согласно выданным симптомам должен поставить диагноз и назначить курс лечения. Если же врач сделал ошибку, компьютер сразу же об этом оповестит и укажет место этой ошибки. Компьютерные технологии используются и в эпидемиологических службах, для того, чтобы составить эпидемиологическую карту, которая позволит следить за скоростью и определять направление распространения вируса. Поэтому можно смело сказать о том, что компьютерная это довольно таки необходимый инструмент в работе медработников. Говорить о том, что компьютерные технологии очень важны в медицине можно очень долго, но последнее решение всегда будет оставаться за эмоциональным компьютером – человеком.

Var a,b,c,d:integer;
begin
  writeln('Введите 4 числа через пробел'); readln(a,b,c,d);
  if (a>0)and(b>0)and(c>0)and(d>0) then writeln('Все числа положительные')
 else if ((a<0)and(b>0)and(c>0)and(d>0))or((a>0)and(b<0)and(c>0)and(d>0))or((a>0)and(b>0)(c<0))or((a>0)and(b>0)and(c>0)and(d<0)) then writeln('3 числа положительные')
  else if ((a<0)and(b<0)and(c>0)and(d>0))or((a<0)and(b>0)and(c<0)and(d>0))or((a<0)and(b>0)and(c>0)and(d>0))or((a<0)and(b>0)and(c>0)and(d<0))or((a>0)and(b<0)and(c<0)and(d>0))or((a>0)and(b<0)and(c>0)and(d<0))or((a>0)and(b>0)and(c<0)and(d<0)) then writeln('2 числа положительных');
  else if ((a>0)and(b<0)and(c<0)and(d<0))or((a<0)and(b>0)and(c<0)and(d<0))or((a<0)and(b<0)and(c>0)and(d<0))or((a<0)and(b<0)and(c<0)and(d>0)) then writeln('1 положительное число')
  else if (a<0)and(b<0)and(c<0)and(d<0) then writeln('Нет положительных чисел');
  readln
end.