Розы - 38 млн. , пионы - 3 млн. , розы AND пионы - 4 млн. , розы OR пионы - 2 млн. , -розы пионы 4 млн.
Человек-
чтение газеты человеком
строительство дома людьми
Общение с друзьями
Хождение в ресторан
Игра в волейбол
Животный мир-
принятие определённой позы собакой при приближении соперника
общение дельфинов между собой
виляние хвостом у собак
Беганье за палкой
Игра волчат
Растительный мир-
Опадение листвы
рост побегов
сезонные изменения в природе
Начало дождя
Рост дерева
Технические системы-
вождение автомобиля
Деланье уроков
гулянка
Стройка самолета
Готовка еды в массовом производстве
last_name = input('Введите Ваше имя: ')
first_name = input('Введите Вашу фамилию: ')
middle_name = input('Введите Ваше отчество: ')
print(f'{last_name} {first_name} {middle_name}')
print(f'{last_name} {first_name[0]}.{middle_name[0]}.')
print(f'Длина имени: {len(last_name)}\nДлина фамилии: {len(first_name)}\nДлина отчества: {len(middle_name)}\nДлина ФИО без учета пробелов: {len(middle_name) + len(first_name) + len(last_name)}')
fio = f'{first_name} {last_name} {middle_name}'
print(fio[::-1])
print(fio.upper())
print(fio.lower())
uses Crt;
var
L:set of 'A'..'Z';
s:string;
c:char;
i,n:byte;
begin
ClrScr;
ReadLn(s);
for i:=1 to Length(s) do begin
c:=UpCase(s[i]);
if c in ['A'..'Z'] then Include(L,c)
end;
n:=0;
for c:='A' to 'Z' do
if c in L then Inc(n);
Writeln(n);
ReadKey
end.
Тестовое решение:
Hello World!
7