program bai1;
uses crt;
var n: integer;
begin
clrscr;
write('nhap so n ='); readln(n);
if n mod 2 = 0 then
writeln(n+1) else
writeln(n);
readln;
end.
2.viết chương trình nhập vào số nguyên dương n. A. Tìm và in ra màn hình các số từ 1 đến n chia hết cho 2. .B. tìm và in ra màn hình số từ 1-n ko chia hết cho 2
Viết Chương Trình Nhập Vào Từ Bàn Phím 2 Số Nguyên Khác Nhau , Sau Đó In Ra Màn Hình Với Thứ Tự Không Giảm
Viết chương trình nhập từ bàn phím hai số nguyên a và b. Thực hiện tính và in ra màn hình tổng và hiệu hai số đó
1. Viết chương trình nhập vào một số nguyên dương n và in ra màn hình dãy số tự nhiên từ 1 tới n. 2. Viết chương trình nhập vào một số nguyên n và in ra màn hình các số nguyên chẵn trong khoảng từ 1 tới n.
a, Viết chương trình pascal nhập vào một dãy số nguyên n từ bàn phím b, in dãy vừa nhập ra màn hình. c, đếm xem bao nhiêu số dương. d, in kết quả số dương ra màn hình.
Viết chương trình nhập vào một số nguyên dương n. Tính và in ra màn hình tổng các số từ 1 đến n thỏa mãn điều kiện không chia hết cho 3. *
Viết chương trình nhập vào một số nguyên dương n. Tính và in ra màn hình tổng các số từ 1 đến n thỏa mãn điều kiện không chia hết cho 3
viết chương trình nhập số nguyên n .nếu số nguyên n Chia hết cho 9 thì hiển thị ra màn hình n là bội của 9.Nếu số nguyên n không chia hết cho 9 thì hiển thị ra màn hình n không là bội của 9
Viết chương trình pascal nhập n số nguyên từ bàn phím. Thực hiện
+ Xuất ra màn hình các số vừa nhập
+Tính tổng các số vừa nhập và xét xem tổng đó có phải là số nguyên tố không ?
Làm giúp với !
Viết chương trình pascal nhập n số nguyên từ bàn phím. Thực hiện
+ Xuất ra màn hình các số vừa nhập
+Tính tổng các số vừa nhập và xét xem tổng đó có phải là số nguyên tố không ?
Làm giúp với !
