Напишите программу на паскале !
нужно найти строчку в тексте(в txt файле) с одного или более слов
и потом эту строчку нужно разбить на слова в столбик

Решение перебором АДЛТДТАТ

Объяснение:

Для начала можно понять, что первая точка и продолжение подходит только для буквы А и в итоге остаётся: -...-..--..-.--, дальше у нас 2 варианта:

1) АД.-..--..-.-- >> 1 - АДА..--..-.-- 2 - АДЛ--..-.--

2)АТ...-..--..-.-- >> АТЖ..--..-.--

Продолжаем перебирать:

1)  АДА..--..-.--  больше нельзя продолжить т.к букв из 2 точек вначале нету.

2) АДЛ--..-.--  >>   АДЛТ-..-.--  >> 1)АДЛТД-.-- 2)АДЛТТ..-.--

3) АТЖ..--..-.--  >> нельзя продолжить из за двух точек.

Продолжаем:

1)АДЛТД-.-- >> АДЛТДТАТ - это ответ

2)АДЛТТ..-.-- нельзя продолжить из за двух точек.

1)a=int(input("Введите первое число"))

b=int(input("Введите второе число"))

c=int(input("Введите третье число"))

if((b>a)and(c>a)and(a/2 in range(1,100000000,1))):

print(f"Среди трёх введеных чисел минимальным чётным является{a}")

elif((a>b)and(c>b)and(b/2 in range(1,100000000,1))):

print(f"Среди трёх введеных чисел минимальным чётным является{b}")

elif((b>c)and(a>c)and(c/2 in range(1,100000000,1))):

print(f"Среди трёх введеных чисел минимальным чётным является{c}")

2)a=int(input("Введите длину отверстия"))

b=int(input("Введите ширину отверстия"))

c=int(input("Введите высоту отверстия"))

d=int(input("Введите длину кирпича"))

e=int(input("Введите ширину кирпича"))

f=int(input("Введите высоту кирпича"))

if((a>=d)and(b>=e)and(c>=f)):

print("Кирпич влезет")

else:

print("Кирпич не влезет")

3)a=str(input())

i=0

e=0

b=["1","2","3","4","5","6","7","8","9","0"]

while(1==1):

if(a[i:i+1] in b):

e=e+1

else:

break

i=i+1

print(e)