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.

27 tháng 8 2017

phynit thầy giúp e với haha

25 tháng 12 2017

program bai1;

var

begin

write('Ten cua ban la ');readln(ten);

write('Nam hien tai la ');readln(nht);

write('Nhap nam sinh ');readln(ns);

write('Ban hoc lop ');readln(lop);

tuoi:=nht-ns;

writeln('Ten cua ban la ',tuoi);

readln

end.

28 tháng 4 2017

1/

program uoc;

uses crt;

var n,i,dem,x:word;

a:array[1..20] of longint;

begin

clrscr;

write('nhap so phan tu cua day:') ;readln(n);

while n>20 do

begin

write('nhap lai so phan tu thoa man toi da la 20 phan tu:');

readln(n);

end;

writeln('nhap cac phan tu cua mang:');

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

end;

write('nhap so nguyen x:'); readln(x);

dem:=0;

for i:=1 to n do

if x mod a[i] =0 then

begin

dem:=dem+1;

writeln(a[i],' la uoc cua ',x);

end;

if dem=0 then writeln('khong co phan tu la uoc cua ',x)

else write('co ',dem,' phan tu la uoc cua ',x);

readln;

end.banhqua

à nó có updates kìa, bạn updates đi

bạn thử vào microsoft store xem

20 tháng 1 2017

o tôi xin 1 bài mẫu dạng này

17 tháng 10 2021

nhìn mặc áo hình như trò chơi con mực đúng hông đấy là trò giết người hả

Tl :

Khong duoc viet lung tung tren dien dang

~ H T ~

15 tháng 8 2020

Đưa lên CHH đi bạn :)

30 tháng 10 2017

k thấy rõ bạn ơi

5 tháng 9 2020

Cảm ơn Phước Thịnh đã tổ chức cuộc thi này. Thầy sẽ nhắn tin và trao giải cho các bạn đạt giải.

Các bạn cố gắng đợi một thời gian rồi thầy @phynit sẽ thưởng cho các bạn