Xuất ra màn hình các số trong phạm vi từ 1 đến n

WEBSITE ĐÃ HOẠT ĐỘNG TRỞ LẠI, TUY NHIÊN SỐ LƯỢNG SUBMIT BỊ GIỚI HẠN MỖI NGÀY CÒN RẤT ÍT (THEO CHÍNH SÁCH MỚI CỦA JUDGE0, BÊN CUNG CẤP API). DO VẬY RẤT MONG CÁC BẠN CHÚ Ý TEST THẬT KỸ CODE TRƯỚC KHI SUBMIT.

lý thuyết
trắc nghiệm
hỏi đáp
bài tập sgk

-Viết chương trình nhập vào từ bàn phím số nguyên dương N, tính tổng các giá trị là số chẵn trong phạm vi từ 1 đến N, sau đó in ra màn hình. -Viết chương trình nhập vào từ bàn phím số nguyên dương N, tính tổng các giá trị là số lẻ trong phạm vi từ 1 đến N, sau đó in ra màn hình. - Viết chương trình nhập vào từ bàn phím số nguyên dương N, để tính tổng các giá trị chia hết cho 3 trong phạm vi từ 1 đến N, sau đó in ra màn hình.

Giúp mk với. Cần gấp 😭😭😭

Các câu hỏi tương tự

lý thuyết
trắc nghiệm
hỏi đáp
bài tập sgk

1.Viết chương trình của các số từ 1 đến n với n nhập vào từ bàn phím,n nguyên dương

2.Viết chương trình in ra màn hình các số chia hết cho 3 và thông báo ra màn hình có bao nhiêu số chia hết cho 3 trong phạm vi từ 1 đến n;biết n nhập vào từ bàn phím,n nguyên dương

3.Viết chương trình tính tích các số từ 15 đến 35,in ra màn hình tích đó

(làm cả xác định bài toán,mô tả thuật toán và viết chương trình)

mai e lm ktra rồi,mong mn giúp ạ

thanks mn trc

Các câu hỏi tương tự

bài 1:

uses crt;var n,i,j:longint;begin clrscr; write('Nhap n:'); readln(n); write('so chan tu 1->n la:'); for i:=1 to n do if i mod 2=0 then write(i,' '); writeln; write('so le tu 1->n la:'); for j:=1 to n do if j mod 2<>0 then write(j,' '); readln;

end.

bài 2:

uses crt;var n,i,j,s,s1:longint;begin clrscr; write('Nhap n:'); readln(n); s1:=1; s:=0; write('tong cac so tu 1->n la:'); for i:=1 to n do s:=s+i; write(s); writeln; write('tich cac so tu 1->n la:'); for j:=1 to n do s1:=s1*j; write(s1); readln;

end.

bài 3:

uses crt;var n,i,j,s,s1:longint;begin clrscr; write('Nhap n:'); readln(n); s1:=0; s:=0; for i:=1 to n do if i mod 2<>0 then s:=s+i; write('tong cac so le tu 1->n la:',s); writeln; for j:=1 to n do if j mod 2<>0 then inc(s1); write('co tat ca ',s1,' so le'); readln;

end.

bài 4:

uses crt;var n,i,j,s,s1:longint;begin clrscr; write('Nhap n:'); readln(n); s1:=0; s:=1; for i:=1 to n do if i mod 2=0 then s:=s*i; write('tich cac so chan tu 1->n la:',s); writeln; for j:=1 to n do if j mod 2=0 then inc(s1); write('co tat ca ',s1,' so chan'); readln;

end.