Var n,i,so:integer;
Begin
Write('Nhap n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,' = ');readln(so);
If so mod 2 = 0 then writeln(so);
End;
Readln;
End.
Var n,i,so:integer;
Begin
Write('Nhap n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,' = ');readln(so);
If so mod 2 = 0 then writeln(so);
End;
Readln;
End.
viết chương trình tính tổng n các số lẻ nhỏ hơn hoặc bằng n bằng
-for do
-while do
Viết chương trình in ra màn hình tổng các số chẵn nhỏ hơn hoặc bằng N và tổng các số lẽ nhỏ hơn hoặc bằng N. Với N là số tự nhiên N nhập từ bàn phím.
Ví dụ: -Input: n=6, {1,2,3,4,5,6}
- Output: - Tổng số chẵn: 12;
- Tổng số lẽ: 9;
Viết chương trình in ra các số chẵn nhỏ hơn hoặc bằng n(n nhập từ bàng phím) giúp mik chiều mai mik thi cuối kì 1
Viết chương trình in ra các số chẵn nhỏ hơn hoặc bằng n( với n được nhập):
a)Cho biến i chạy từ 1 đến n.
b) Nếu i chẵn (i chia 2 dư ) thì in ra.
câu 6: dùng vòng lặp for...do hoặc while...do viết chương trình tính và in ra tổng sau: s=1+1/2+1/3+....+1/50
câu 6: dùng vòng lặp for...do hoặc while...do viết chương trình tính và in ra tổng sau: s=1+1/2+1/3+....+1/50
giải giúp em ạ
viết chương trình tính tổng các số chẵn trong phạm vi từ 2 đến 50 thông báo kết quả ra màn hình bằng cách sử dụng vòng lặp while...do.
Xoá sạch màn hình kết quả, sử dụng vòng lặp For .. do hoặc While ..do viết chương trình tính tổng sau:
S=1.2 + 2.3+ 3.4 + ...+ n.(n+1) (n nhập từ bàn phím)
viết chương trình tính tổng các số chẵn nhỏ hơn hoặc bằng n với n là số nguyênđược nhập từ bàn phím .chỉ em đi em cần gấp :<