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())
begin
var a:=ReadArrInteger('Введите 10 чисел, нажмите Enter'+#13#10,10);
var t:=a.Select((x,i)->(x,i+1)).Where(x->x[0]<0);
Write('Отрицательных- ',t.Count,'; их номера ');
t.Select(x->x[1]).Println
end.
Пример
Введите 10 чисел, нажмите Enter
3 14 0 -13 6 -11 -4 0 7 12
Отрицательных- 3; их номера 4 6 7