Порграмирование в Python
Создать канву модуле tkinter , на нее поместить шарик и прямоугольник.

Шарик будет двигаться самостоятельно, меняя направление движения каждые 5 секунд случайным образом

Движение прямоугольника управляется пользователем с клавиатуры кнопками например стрелками.

В начале работы шарик помещается в центр канвы.

порграмирование в Python

from tkinter import *

import random

import time

def move(event):

   if event.keysym == 'Up':

       canvas.move(p, 0, -3)

   elif event.keysym == 'Down':

       canvas.move(p, 0, 3)

   elif event.keysym == 'Left':

       canvas.move(p, -3, 0)

   elif event.keysym == 'Right':

       canvas.move(p, 3, 0)

def mainloop():

   while 1:

       canvas.move(c, random.randint(-6, 6), random.randint(-6, 6))

       tk.update_idletasks()

       tk.update()

       time.sleep(0.01)

colors=['black', 'white', 'red', 'yellow', 'blue', 'purple']

tk=Tk()

tk.geometry('400x400')

canvas=Canvas (tk, width=400, height=400)

canvas.pack(fill='both', expand=True)

p=canvas.create_rectangle(10, 10, 70, 150, fill=random.choice(colors), outline=random.choice(colors))

c=canvas.create_oval(190, 190, 210, 210, fill=random.choice(colors), outline=random.choice(colors))

canvas.bind_all('<KeyPress-Up>', move)

canvas.bind_all('<KeyPress-Down>', move)

canvas.bind_all('<KeyPress-Left>', move)

canvas.bind_all('<KeyPress-Right>', move)

mainloop()

Объяснение:

// pascalabc.net 3.1, сборка 1198 от 11.03.2016 begin   var bnk: =arr(500,100,50,10);   var s: =readinteger('сдача, руб: ');   var kol: =arr(0,0,0,0);   for var i: =0 to 3 do begin       kol[i]: =s div bnk[i];       s: =s mod bnk[i]       end;   if s< > 0 then writeln('сдачу дать невозможно')   else begin       writeln('следует дать: ');       for var i: =0 to 3 do           writeln('банкнот по ',bnk[i],' руб - ',kol[i],' шт.')       end end. тестовое решение: сдача, руб: 850 следует дать: банкнот по 500 руб - 1 шт. банкнот по 100 руб - 3 шт. банкнот по 50 руб - 1 шт. банкнот по 10 руб - 0 шт.