Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
nguyennguyen
Xem chi tiết
Ngânn Okk
Xem chi tiết
Minh Lệ
2 tháng 4 2021 lúc 9:31

program hoc24;

n: string[20];

k,i,t,d,d1: byte;

code: integer;

begin

write('Nhap so K: '); readln(k);

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

d:=0; d1:=0;

 for i:=1 to k do

begin

val(n[i],t,code);

if t mod 2=0 then d:=d+1 else d1:=d1+1;

end;

writeln('Co ',d,' chu so chan');

write('Co ',d1,' chu so le');

readln

end.

Khánh Ngọc
Xem chi tiết
Lưu Thị Thanh Thủy
Xem chi tiết
duy doan
Xem chi tiết
Nguyễn Lê Phước Thịnh
27 tháng 2 2022 lúc 13:31

undefined

Ngọc Anh
Xem chi tiết
Phạm Anh Tuấn
Xem chi tiết
♥➴Hận đời FA➴♥
Xem chi tiết
Nguyen Hieu
Xem chi tiết