a=input()
for i in range(len(list(a))-1):
print(a[i],end="*")
print(a[i+1])
Знания это информация и действия применяемые тобой как средства выживания и и.д
Классификации:
1. Классификация на основании предметной области знания. Это деление знаний на математические, гуманитарные, естественные и технические.
2. Классификация на основании способа отображения сущности знаний. Это деление знаний на феноменталистские (описательные) и эссенциалистские (объяснительные, в основе которых лежат количественные средства анализа).
3. Классификация на основании отношения к деятельности тех или иных субъектов. Это деление знаний на дескриптивные (описательные) и перспективные (нормативные, содержащие прямые указания к действию, предписания).
4. Классификация на основании функционального назначения. Это деление знания на фундаментальные, прикладные и разработки.
Вроде так
Ранним утром, воробей пролетел мимо леса. Но услышав всхлипы животного , он полетел на звук. Летел он , летел и видит , заяц сидит на земле и плачет.
- "Что случилось заяц?" - спрашивает он.
- "Да вот , потерялся я , всю ночь по лесу бродил, не могу выбраться."
- "Ну, чего ты, не горюй. Помогу я тебе дом найти , ты только скажи где ты обитаешь и как домик то твой выглядит?"
- " Мой дом с красной крышей , сам синий , а рядом морковки лежат "
-"Так, хорошо , жди здесь и не уходи, я скоро прилечу."
-"Хорошо "
Тем временем воробей уже во всю старался найти домик зайца, спрашивал у животных , букашек. Но никто не знал , где находиться зайкин дом.
Но уже ближе к вечеру , он увидел красную крышу , а потом и морковки. На радостях он полетел к зайке.
-"Зайка, зайка!"-звал он его .
-" Воробей , это ты ? Я здесь !"
- "Я нашёл , пойдём скорей "
И спустя некоторое время они пришли к домику зайки. Он его поблагодарил и пригласил на чай , о воробей сказал ему больше не теряться. Так теперь они и живут вместе и помогают друг другу
5)
program ex1;var x, y, z : integer;begin x:= 17; y:= -9; if x < y then z:= x * y else z:= y + x; writeln(z);end.
6)
program ex1;var x, tmp : real;begin readln(x); if x<=0 then tmp:=(sin(sqr(x)) - sqrt(power(x,3)+1))/(5*power(x,4)+ 3.5*x); if (x>0) and (x<=4) then tmp:=sqrt(x+sqrt(x+1))+4*x; if x>4 then tmp:= (1.44*abs(power(x,3)-1)-2.5*x)/(x+1);write(tmp);end.
7)
program ex1;var a,b,c:integer;begin readln(a,b,c); if (a>= -3) and (a<2) then write (' a '); if (b>= -3) and (b<2) then write (' b '); if (c>= -3) and (c<2) then write (' c ');end.