1) Написати програму, яка отримує від користувача назву файла і його розширення. Потрібно вивести на екран тільки розширення веденого файла. Використовувати методи .split() і repr. 2) Використовувати f-string
Написати програму, яка на вході отримує готову дату і вам потрібно роздрукувати числа, так щоб мало наступний вигляд:
Ввід: (21,11,2020)
Вивід: Екзамен почнеться у 21/11/2020
3) Чистовувати f-string
Напишіть програму, яка на вході отримує число n і виводить послідовність додавання n+nn+nnn.
Наприклад:
Ввід: 5.
Вивід: 5+55+555
І отримуємо 615
4) Певірка повинна бути через умови (if, elif, else)
Написати програму в якій перевіряється чи даний список пустий чи ні.
5) Потрібно використати for-цикли.
Напишіть програму, де відбуваться вставка слова і приєднання до нього числа в діапозоні заданого списка.
Ввід: num = [1,2,3,4]
Вивід: ['emp1', 'emp2', 'emp3', 'emp4']
6) Потрібно використати цикл і в ньому вкладений цикл, також потрібно знати метод додавання значень у список.
Створіть список у списку, де всі значення нулі. Всередині одного списку, повинно бути 3 списка і значення 0.
Наприклад: [[0,0], [0,0], [0,0]]
7) Створіть програму для оприділення знаку зодіака людини. На вході отримуємо номер дня і місяця, і на виході Зодіак людини
Наприклад:
Ввід: 15 6
Вивід: Близнюки.
8) ХТО ХОЧЕ СТАТИ МІЛЬЙОНЕРОМ: Тобто задаються питання(до 6 питань) програмою і людина відповідає. Підраховуються очки і виводиться результат на екран чи виграла людина чи ні.
9) AMONG US: Потрібно створити програму, яка буде оприділяти хто є диверсантом. Тобто якщо хтось із ваших чоловічків введе слово "Boom", то програма повинна його зафіксувати і видати результат.
10) Створіть програму, яка із вибірки характеристик генерує коментар до даного персонажа. Наприклад:
Список характеристик: [хороший, поганий, старанний, напористий]
Вивід: Вася Пупкін є дуже напористий і хороший, і всім він подобається.
ответ:1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
var
Chislo, Count, Summa, n: integer;
begin
Summa := 0;
Count := 0;
readln(Chislo);
while Chislo > 0 do
begin
n := Chislo mod 10;
if odd(n) then
begin
Summa := Summa + n;
inc(Count);
end;
Chislo := Chislo div 10;
end;
writeln('Сумма нечетных цифр числа: ', Summa);
writeln('Кол-во нечетных цифр числа: ', Count);
writeln('Среднее арифметическое нечетных цифр: ', Summa / Count);
end.
Объяснение: