hromgugd
17.07.2020 23:41

Желилик адаптер дегенимиз не?​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
эля0521
24.09.2021 03:06

var

 t : array of double;

 i, n, mincount, midUp, midDown : integer;

 mid : double;

begin

 write('Введите кол-во элементов массива :');

 readln(n);

 randomize;

 setlength(t, n);

 mincount:=0;

 for i:=0 to n-1 do begin

   t[i] := random(10)/10;

   write(t[i]:1:1,'  ');

   if t[i]<0.3 then inc(mincount);

 end;

 writeln('');

 writeln('Кол-во элементов <0.3 =',mincount);

 writeln('---------------- задача 2 --------------');

 mid:=0;

 for i:=0 to n-1 do begin

   t[i] := random(10)*100 +random(10)*10 +random(10);

   mid:=mid+t[i];

   write(t[i]:0:0,' ');

 end;

 mid:=mid/n;

 midUp:=0;    midDown:=0;

 for i:=0 to n-1 do begin

   if t[i]<mid then inc(midDown);

   if t[i]>mid then inc(midUp);

 end;

 writeln();

 writeln('Средняя з/п = ',mid:1:1);

 writeln('Кол-во работников с з/п выше средней =', midUp);

 writeln('Кол-во работников с з/п ниже средней =', midDown);

end.


1. Разработать программу на языке программирования Turbo Pascal: а) в массиве t(n), где n - заданное
0,0(0 оценок)
Ответ:
aleksey778
16.05.2020 19:57

1.

with open("input.txt") as f:

  reads=list(map(float,f.read().split("\n")))

with open("output.txt", "w") as f:

  for i in range(len(reads)):

      if reads[i]<=0:

          reads[i]="A cold, is not it?"

      elif reads[i]<10:

          reads[i]="Cool."

      else:

          reads[i]="Nice weather we`re having.."

  f.write("\n".join(reads))

2.

with open("input.txt") as f:

  reads=f.read().split("\n")

with open("output.txt", "w") as f:

  for i in range(len(reads)):

      if reads[i] in ("yes","YES","Yes"):

          reads[i]="Yes"

      else: reads[i] = "No"

  f.write("\n".join(reads))

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота