Anastasii03
21.12.2020 23:31

Дан текст, который вводится с клавиатуры. Составить программу, которая выводит его на экран столько раз, сколько символов в этом тексте.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
aruzhan152
06.05.2020 13:43
Для начала стоит сказать, что Вы используете неправильный модуль. Вам нужен vk_api.bot_longpoll.

Отследить выход человека из беседы можно, проверяя сообщение на наличие ключа action с типом chat_kick_user.

Пример (Python 3.8+):

from vk_api import VkApi
from vk_api.bot_longpoll import VkBotLongPoll, VkBotEventType

ACCESS_TOKEN = '' # Подставьте свой!
GROUP_ID = # Подставьте свой!

vk_session = VkApi(token=ACCESS_TOKEN)
vk = vk_session.get_api()
longpoll = VkBotLongPoll(vk_session, GROUP_ID)

def main():
for event in longpoll.listen():
if event.type == VkBotEventType.MESSAGE_NEW and (action := event.obj['message'].get('action')):
if action['type'] == 'chat_kick_user':
vk.messages.removeChatUser(
chat_id=event.chat_id,
user_id=action['member_id'],
)

if __name__ == '__main__':
main()
Не забудьте, что боту необходимо выдать права администратора беседы
0,0(0 оценок)
Ответ:
Adik20061
03.04.2022 14:55
//Я просто опишу метод записи матрицы
const n=100;
var ar:array of array of integer;
 ars:array of array of string;
 i:integer;
 
procedure complection(var ar:array of array of integer;var ars:array of array of string);
var
 i,j:integer;
begin;
for i:=1 to n do
 begin;
   for j:=1 to n do
    begin;
     ar[i,j]:=random(9);
     str(ar[i,j],ars[i,j]);
    end;
 end;
end;

procedure burning(ars:array of array of string);
var
 i,j:integer;
 t:text;
 begin;
  assign(t,'text.txt');
  rewrite(t);
  for i:=1 to n do
   begin;
    writeln(t,' ');
     for j:=1 to n do
      write(t,ars[i,j],' ');
   end;
 end;  

begin;
randomize;
setlength(ar,n+1);
setlength(ars,n+1);
for i:=1 to n do
 begin;
  setlength(ar[i],n+1);
  setlength(ars[i],n+1);
 end;
complection(ar,ars);
burning(ars);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота