Задан список из десяти городов. (array [.]of string)подсчитать количество названий, в которых нет буквы «р».

Program  chik; const n=10; var  a: array[1..100]of  string; i,k: integer; begin for i: =1 to n do begin readln(a[i]); if(pos('р',a[i])=0)then  k: =k+1; end; writeln(k); end.

Import math def check_square(circle_sq,rect_sq):       l_rect = math.sqrt(rect_sq)       r_in_circle = l_rect/2       s_in_circle = math.pi*pow(r_in_circle,2)       if circle_sq < = s_in_circle:               print("круг уместится в квадрате")       #       r_circle = math.sqrt(circle_sq/math.pi)       d_circle = r_circle*2       s_in_rect = pow(d_circle,2)/2       if rect_sq < = s_in_rect:               print("вадрат уместится в круге") circle_sq = input("введите площать круга: ") rect_sq = input("введите площать квадрата: ") check_square(circle_sq,rect_sq)

Программа: a = input("введите текущую координату фигуры(вертикаль): ") b = input("введите текущую координату фигуры(горизонталь): ") c = input("введите координату для хода(вертикаль): ") d = input("введите координату для хода(горизонталь): ") # условие if (a==c) and (b==c): #конец условия       print("фигура может сделать ход") else:       print("фигура не может сделать ход") условия: а) if (a==c) and (b==c): #ладья б) if abs(a-c) == abs(b-d): #слон в) if abs(a-c)==1 or abs(b-d)==1: #король г) if abs(a-c) == abs(b-d) or a == c or b == d: #ферзь ж) if((abs(abs(a-c)-2)< 0.5) and (abs(abs(b-d)-1)< 0.5)               or (abs(abs(a-c)-1)< 0.5) and (abs(abs(b-d)-2.0)< 0.5)): #конь