1:
uses crt;
var i:integer;
begin
clrscr;
writeln('100 so tu nhien dau tien la: ');
for i:=0 to 99 do
write(i:4);
readln;
end.
2:
uses crt;
var i:integer;
begin
clrscr;
writeln('cac so le trong day 100 so tu nhien dau tien la: ');
for i:=0 to 99 do
if i mod 2=1 then write(i:4);
readln;
end.
AI GIÚP MIK BÀI NÀY VS
1) viết chương trình tính tổng 100 số tự nhiên đầu tiên
2. viết chương trình kiểm tra số n nhập từ bàn phím có chia hết cho hai số 2 và 3 không. nếu có thì in ra dòng chữ chia hết và không chia hết
Câu1 viết chương trình nhập giá trị n từ ban phím in các số chẵn từ 1 đến n Câu2 viết chương trình in ra màn hình các số chẵn đầu tiên với chẵn nhỏ nhất >1000 Lm ơn tui sắp kiểm tra r
viết chương trình pascal tính tổng 10 số tự nhiên đầu tiên nhập từ bàn phím ( viết bằng thuật toán bài 6)
giúp mik lẹ vs ạ mai mik thi
Viết chương trình nhập vào một số tự nhiên từ 2 đến 8 và in ra màn hình thứ tương ứng với số đã nhập
Viết chương trình in ra số lớn nhất trong bốn số nhập từ bàn phím với điều kiện chỉ được dùng 2 biến
Viết chương trình kiểm tra một số nguyên a có phải là số chia hết cho 5 không. Nếu chia hết in ra "CO", ngược lại in ra "KHONG". Biến a được nhập từ bàn phím:
Cíu mình với :(
Bài toán: Lan, Hà, Mai lần lượt có sô tuổi khác nhau, biết số tuổi của các bạn được nhập từ bàn phím. hãy viết chương trình in ra màn hình tổng số tuổi của ba bạn. giải hộ mình bài này với!!!
Giả sử cần viết chương trình nhập một số tự nhiên vào máy tính và in ra màn hình kết quả số đã nhập chẵn hay lẻ, chẳng hạn “5 là số lẻ”, “8 là số chẵn”. Hãy mô tả các bước của thuật toán để giải quyết bài toán trên và viết chương trình Pascal để thực hiện thuật toán đó.
Giả sử cần viết chương trình nhập một số tự nhiên vào máy tính và in ra màn hình kết quả số đã nhập có phải là số lẻ, chẳng hạn “5 là số lẻ”, “6 không phải là số lẻ". Hãy mô tả các bước của thuật toán để giải quyết bài toán trên
