có bạn nào biết đề thi tin hoc trẻ của tỉnh không ?
nếu có thì cho mình biết nhé
hãy viết câu lệnh logo để vẽ 4 hình vuông có
cạnh là:100
nét màu là :tím
nét bút là: 2 2
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | Program Dien_h_hinh_thang; Uses crt; Var a,b,c:integer; Begin clrscr; write('nhap do dai cua day lon :'); readln(a); write('nhap do dai cua day nho :'); readln(b); write('nhap do dai cua chieu cao :'); readln(c); writeln('tong hai canh day'); writeln(a,'+',b,'=',a+b); writeln('tong hai canh day nhan voi chieu cao'); writeln(a+b,'*',c,'=',(a+b)*c); writeln('dien h hinh thang'); writeln((a+b)*c,'/',2,'=',((a+b)*c)/2:5:2); readln; End. |
bn muốn biết rõ hơn thì lên google nhé, mk tìm thấy cái này trên đó, nhưng chưa thử!
setpc 4 setpensize 4 repeat 8 [ fd 100 rt 360/8]
SETPENCOLOR 4
LABEL [Hello VIETNAM!]
SETPENCOLOR 1
RT 90 LABEL [Hello VIETNAM!]
setpencolor 5
setpensize [2 2]
repeat 4[repeat 4[fd 100 rt 90]rt 90]
nếu đúng k mình nha các bạn