<span>class Bank<span>:
</span> def __init__(self,vklad)<span>:
</span> self.vklad = <span>vklad
</span> def information(self)<span>:
</span> if self.vklad < 5000<span>:
</span> print("Ви маєте спалити ",self.vklad*0.2,'$ в год')
elif self.vklad >= 5000 and self.vklad <15000<span>:
</span> print("Ви маєте спалити ",self.vklad*0.2,'$ в год')
else<span>:
</span> print("Ви маєте спалити ",self.vklad*0.2,'$ в год')
n = int(input("Введыть суму: "))
one_person = Bank(n)
one_person.information()
</span>
{общий член последовательности можно задать формулой Sn=((An-1)+(Bn-1))/(An-1) где A- числитель, В - знаменатель }
const n=10;
var A,B,C,i,k: integer;
begin
A:=1; B:=1;
{ вывод последовательности на экран }
for i:=2 to n do
begin
C:=A; A:=A+B; B:=C;
writeln(i,' -> ',A,'/',B);
end;
{ подсчет k - го члена }
k:=20; A:=1; B:=1;
for i:=2 to k do
begin
C:=A; A:=A+B; B:=C;
end;
writeln(k,' - ый элемент = ',A,'/',B);
<span>end.
</span>
Объяснение:
1 это или логическое сложение ( её обозначил как перевернатую ^)
^ это и логическое умножения
¬ это не отрицания
Ну на телефоне должна быть программа YouTube и по этой программе можно смотреть)
Var s,sw: string;
i,j,bst: integer;
begin
s:='строка для решения арба еле реестр';
bst:=1; sw:=''; write('строка для поиска - ');
writeln(s);
for i:=1 to length(s) do
begin
if (Ord(s[i])=32) then
begin
if (s[bst]=s[i-1]) then
begin
for j:=bst to i-1 do sw:=sw+s[j];
writeln('найдено слово - ',sw);
sw:='';
end;
bst:=i+1;
end;
end;
if (s[bst]=s[length(s)]) then
begin
for i:=bst to length(s) do sw:=sw+s[i];
writeln('найдено слово - ',sw);
end;
<span>end.
</span>