Решите на pascal:
ОЧЕНЬ патентованное средство для похудания гарантирует потерю 1% веса за день. начальный вес больного вводится с клавиатуры. сколько дней придется лечиться больному, чтобы его вес снизился до желаемого значения?

1) Глобус-модель, яка уособлює земну кулю, карту землі і нашої рідної планети. 2) Частота - показує певний момент, коли ту чи іншу дію покращився, збільшилося в кількості, розмірах і так далі. 3) зображення показує етапи виверження вулкана і властивості. 4) Модель корабля, що показує в мініатюрі, як би виглядав корабель. 5) 3д модель церкви - модель, що показує як би виглядала Церква. 6) креслення деталі - принцип той же: показати, як би виглядала деталь, також за до цього креслення можна виконати цю деталь. (я трохи не зрозумів завдання, якщо я зробив неправильно-напиши, перероблю.)

Объяснение:

n, counter, spisok, new_spisok = int(input()), 0, [], []

while counter != n:

spisok.append(int(input()))

counter += 1

c1, c2 = int(input()), int(input())

for i in spisok:

if c1 <= i <= c2:

new_spisok.append(i)

print(new_spisok, len(new_spisok))

Объяснение:

1) хз зачем там цикл while, но раз в условии написано, то сделал через него;

2) скорее всего работать нужно со списками, а не массивами, так как append - метод списка;

3) если нужно, могу объяснить каждую строку;

4) формат вывода массива не указан, поэтому вывод обычного массива с его длиной через запятую;

5) нижние слеши это пробелы типа)

Объяснение: