K
Khách

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.

20 tháng 4 2022

repeat 6[repeat 7[fd 100 rt 360/7] rt 360/6

19 tháng 4 2022

1000000=678=BAO NHIÊU CẦN TRỢ LÝ GIÚP ĐỠ

20 tháng 4 2022

b : aa

17 tháng 4 2022

Program HOC24;

var  d,N,i: integer;

t: longint;

begin

write('Nhap N: '); readln(n);

for i:=1 to n do

begin

write('Nhap so thu ',i,': '); readln(a[i]);

end;

t:=0; d:=0;

for i:=1 to n do

begin

t:=t+a[i];

if a[i]>0 then d:=d+1;

end;

writeln('Tong day so la: ',t);

write('Co ',d,' so nguyen duong');

readln

end.

17 tháng 4 2022

mình biết nè 

17 tháng 4 2022

bạn tích cho mình đi rồi mình chỉ cho