Lootfarm
10.08.2021 15:04

Каждому пушному завёртку в возрасте до 2-х месяцев полагается дополнительный стакан молока в день,если его вес не меньше 300г.в режиме отображения формул создать таблицу содержащую сведения о пяти завёртках(кличка,возраст,вес)выяснить сколько литров молока необходимо для зверофермы.один стакан молока составляет 0,2 литра

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
fuuuuuuu1
27.04.2023 16:26

--- Python 3.8.3 ---

import typing

from typing import List  

from typing import AnyStr

from typing import Tuple

from typing import Callable

from typing import Any

class FactPackLoader:

   def __init__(self, TrueCode: str = '1', FalseCode: str = '0', encoding: AnyStr = 'utf-8',):

       self._encoding = encoding

       self._trueAnswCode = TrueCode

       self._falseAnswCode = FalseCode

   def LoadPack(self, FactPackPath: AnyStr, AnswSplitter: AnyStr = ':: ') -> Tuple[AnyStr, int]:

       with open(FactPackPath, 'r', encoding=self._encoding) as data:

           RawData = data.read().split('\n')

       for FactPair in RawData:

           FactPair = tuple(FactPair.split(AnswSplitter))

           yield (FactPair[0], self._ToBool(FactPair[1]))

           

   def _ToBool(self, replyCode):

       if replyCode == self._trueAnswCode: return True

       return False  

def main():

   f = FactPackLoader()

   print('"Правда-Ложь"\nАвтор: KnowsUser1\nVersion: 0.0.1 Ya-Sdelyal')

   IsGameRunning = 'y'

   while IsGameRunning == 'y':

       lives = 3

       fp = input('Укажите имя файла, содержащего пак фактов:\n')

       facts = f.LoadPack(fp)

       for i, Q in enumerate(facts):

           print(f'Вопрос {i+1}:\n{Q[0]}')

           reply = True if input().lower() == 'да' else False

           if reply != Q[1]:

               lives -= 1

               print(f'Вы не поверите, но тот факт, что {Q[0]}, действительно является правдой!\nЖизней осталось: {lives}')

           else:

               print(f'Вы совершенно правы!')

           if lives <= 0:

               print('Вы проиграли')

               IsGameRunning = input('Попробуем ещё раз? Y/N\n').lower()

               break

       else:

           print('Поздравляем, вы успешно выполнили все задания из файла!')

           IsGameRunning = input('Сыграем ещё раз? Y/N\n').lower()

if __name__ == "__main__":

   main()

В файле с паком вопросов после каждого вопроса должен быть указан код ответа (по умолчанию - 1 - истина, 0 - ложь), отделённый от вопроса особым символом/набором символов (по умолчанию - ':: ')

Коды ответа при необходимости в изменении указываются при создании экземпляра FactPackLoader(), символ-разделитель - при вызове LoadPack().

По умолчанию в файле с заданиями пара вопрос ответ выглядит так:

//facts.txt

На самом деле солнце белого цвета :: 1

После "::" должен стоять пробел

P.S - Код main() можно и нужно рефакторить, ибо сейчас это нечто страшное.

P.S 2 Да, я часто обращаю внимание на плохой код людей, а сейчас сам его написал. Вынепонимаете, этодругое =))

P.S 3 Проверял, программа работает. Если что то сломалось, виноват сайт. На всякий случай прикреплю файл исходного кода в .txt

0,0(0 оценок)
Ответ:
adamenkofamily
22.09.2020 16:17
Из небольших ускорений можно предложить проверять до b[c], дальше всё равно ничего нет. Но всё равно алгоритм будет делать порядка n^2 операций, что при n = 10^5 достаточно много. Кстати, 2*10^9 еще помещается в longint, int64 не нужен.

Можно пойти другим путём. Отсортируем массив A[i] за n log n, а потом для того, чтобы определить уникальные элементы, достаточно одного прохода по массиву.
Я буду сортировать сортировкой слиянием, вы можете использовать любую другую достаточно быструю сортировку.

procedure merge(var a: array of longint; left1, right1, left2, right2: integer);
var
  temp: array of longint;
  i, j, k: integer;
 
begin
  setLength(temp, right1 - left1 + right2 - left2 + 2);
  i := left1;
  j := left2;
  k := 0;
  while (i <= right1) and (j <= right2) do
  begin
    if a[i] <= a[j] then
    begin
      temp[k] := a[i];
      inc(i);
    end else begin
      temp[k] := a[j];
      inc(j);
    end;
    inc(k);
  end;
  while i <= right1 do
  begin
    temp[k] := a[i];
    inc(k);
    inc(i);
  end;
  while j <= right2 do
  begin
    temp[k] := a[j];
    inc(k);
    inc(j);
  end;
  for i := left1 to right1 do
    a[i] := temp[i - left1];
  for j := left2 to right2 do
    a[j] := temp[j - left2 + right1 - left1 + 1];
end;
 
procedure mergeSort(var a: array of longint; left, right: integer);
var
  t: longint;
 
begin
  if right - left = 0 then exit;
  if right - left = 1 then
  begin
    if a[left] > a[right] then
    begin
      t := a[left];
      a[left] := a[right];
      a[right] := t;
    end;
    exit;
  end;
  mergeSort(a, left, (left + right) div 2);
  mergeSort(a, (left + right) div 2 +  1, right);
  merge(a, left, (left + right) div 2, (left + right) div 2 + 1, right);
end;
 
var
  a: array of longint;
  i, n, count: integer;
 
begin
  read(n);
  setLength(a, n);
  for i := 0 to n - 1 do
    read(a[i]);
  mergeSort(a, 0, n - 1);
  count := 1;
  for i := 1 to n - 1 do
    if a[i] <> a[i - 1] then
      inc(count);
  writeln(count);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота