uses crt;
var n: integer;
begin
repeat write('Nhap n: '); readln(n); until n > 0;
writeln('Chu so tan cung la: ', n mod 10);
readln
end.
uses crt;
var n: integer;
begin
repeat write('Nhap n: '); readln(n); until n > 0;
writeln('Chu so tan cung la: ', n mod 10);
readln
end.
Viết chương trình nhập vào một số nguyên dương n hữu hạn bất kỳ hiển thị ra màn hình các số lẻ trong đoạn từ 1 đến n. Giải giúp em với ạ!
Viết ct nhập vào một mảnh gồm N số nguyên dương (N nguyên dương nhập từ bàn phím, N<=100) sau đó
a) tính tổng các số là bội của 3
b) tìm giá trị lớn nhất của mảng
c) Xét xem phần tử đầu tiên của mảng có phải là số nguyên tố hay ko
c) Cho biết các giá trị của mảng đc sx theo thứ tự ko gian chưa
Hãy viết chương trình nhập vào số nguyên dương A gồm 10 phần tử. Đếm số lượng các số chẵn trong dãy A vừa nhập. Đưa ra màn hình : dãy số vừa nhập, số lượng số chẵn trong dãy số vừa đếm được .
Mọi người ơi, giúp mình với ạ mình cảm ơn rất nhiều !!
Giải giúp mình nha Viết CT nhập từ bàn phím mảng 1 chiều A gồm N phần tử là số nguyên (1<=N<=250). Tính và in ra màn hình các phần tử có số tận cùng là 7
Viết chương trình nhập vào ma trận vuông kiểu số nguyên cấp N, với N không quá 20; in ra ma trận vừa nhập;cho biết giá trị của phần từ lớn nhất trong ma trận; đếm số phần tử là bội số của K, với K nhập từ bàn phím, tính tích các phần tử dương nằm trên đường chéo chính, cho biết hàng nào có tổng các phần tử là nhỏ nhất
viết chương trình nhập n nguyên dương (n≤200). Tạo số ngẫu nhiên từ 10→100 cho mảng A có n phần tử. Nhập k. Tìm vị trí phẩn tử có giá trị bằng k. Sắp xếp mảng tăng dần.
giúp mình với ạ!!
viết chương trình nhập vào dãy M gồm N (N <= 100) số nguyên. Đếm và tính tổng các số chia hết cho 3 trong dãy
Giúp mình với ạ