Trang chủ Tin Học Lớp 8 có ai có code pascal chuyển động 3d siêu sinh...

có ai có code pascal chuyển động 3d siêu sinh động ko xin code câu hỏi 3023389 - hoctapsgk.com

Câu hỏi :

có ai có code pascal chuyển động 3d siêu sinh động ko xin code

Lời giải 1 :

#Source Code Tỏ Tình Bằng Qrcode
import pyqrcode
import string
import os
from time import time, ctime
a = 1

for a in range (7): print("")
print("                  ░██████╗░██████╗░░█████╗░░█████╗░██████╗░███████╗")
print("                  ██╔═══██╗██╔══██╗██╔══██╗██╔══██╗██╔══██╗██╔════╝")
print("                  ██║██╗██║██████╔╝██║░░╚═╝██║░░██║██║░░██║█████╗░░")
print("                  ╚██████╔╝██╔══██╗██║░░██╗██║░░██║██║░░██║██╔══╝░░")
print("                  ░╚═██╔═╝░██║░░██║╚█████╔╝╚█████╔╝██████╔╝███████╗")
print("                  ░░░╚═╝░░░╚═╝░░╚═╝░╚════╝░░╚════╝░╚═════╝░╚══════╝")
print("")
print("                          Việt đẹp trai !!!")
print("")

fname = '.png'
s = str(input("                           >>>CONTENT: "))
t = str(ctime(time()))
t = t.replace(':',"'")
fname = '[' + t + ']' + fname
print("                           >>>Processing...")
url = pyqrcode.create(s, encoding='utf-8')
url.png(fname, scale = 10)
print("                           >>>Done!")
os.startfile(fname)

while (True): a = a + 1

để chạy code này:

bước 1:bạn phải vào cmd gõ lệnh là pip install pyqrcode

bước 2 bạn đổi tên ở print("                          Việt đẹp trai !!!") dòng này bạn đổi tên của bạn vào 

bước 3 bạn chạy code trên cmd 

chúc bạn thanh công 

Thảo luận

-- xong tus kiểu: -.-
-- code 30 dòng
-- https://hoidap247.com/cau-hoi/3023754
-- 2 thanh niên copy của nhau
-- xong đơn thương r, zui qué
-- Chúc mừng
-- cmd là j đó
-- Bạn ko bt dùng cmd là như nào à

Lời giải 2 :

uses crt,graph; const r=50; s=3; var gd,gm,x,y,mx,my,nen: integer; c: char; procedure Bong(x,y,mau: word); begin setcolor(mau); setfillstyle(1,mau); fillellipse(x,y,r,r); end; begin gd:= detect; initgraph(gd,gm,”); nen:=cyan; setbkcolor(nen); mx:= getmaxx; my:= getmaxy; randomize; x:= random(mx-2*r)+r; y:=random(my-2*r)+r; bong(x,y,red); repeat  c := readkey; if (c = #0) then begin c := readkey; case c of #75: while (not keypressed) and (x>r) do begin bong(x,y,nen);x:=x-s;bong(x,y,red);delay(100) end; #77: while (not keypressed) and (x begin bong(x,y,nen);x:=x+s;bong(x,y,red);delay(100) end; #72: while (not keypressed) and (y>r) do begin bong(x,y,nen);y:=y-s;bong(x,y,red);delay(100) end; #80: while (not keypressed) and (y begin bong(x,y,nen);y:=y+s;bong(x,y,red);delay(100) end; end; end; until c=#27; closegraph; end.

Bạn có biết?

Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.

Nguồn : Wikipedia - Bách khoa toàn thư

Tâm sự 8

Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần, sang năm lại là năm cuối cấp áp lực lớn dần nhưng các em vẫn phải chú ý sức khỏe nhé!

Nguồn : ADMIN :))

Liên hệ hợp tác hoặc quảng cáo: gmail

Điều khoản dịch vụ

Copyright © 2021 HOCTAPSGK