2. Viết chương trình in ra các số chẵn từ 2 đến 20 HD: nếu n là số chẵn thì: n mod 2 = 0 Vậy dùng lệnh lặp for cho i chạy từ 1 đền 20 nếu i là số chẵn thì write(i,’ ’); 3. Viết chương trình in ra màn hình các số lẻ từ 1 đến 20 HD: nếu n là số lẻ thì: n mod 2 <>0 m.n giúp e vs ạ e hứa sẽ cho 5* và cảm ơn
2 câu trả lời
2.
program Tin_hoc;
uses crt;
var i,tong:integer;
begin
clrscr;
tong:=0;
for i:= 1 to 20 do i mod 2 = 0 then tong:=tong + i;
writeln('Tong cac so chan tu 1 den 20 la: ',tong);
readln;
end.
3.
program Tin_hoc;
uses crt;
var i,tong:integer;
begin
clrscr;
tong:=0;
for i:= 1 to 20 do i mod 2 = 1 then tong:=tong + i;
writeln('Tong cac so chan tu 1 den 20 la: ',tong);
readln;
end.
2.Program Hotboy
Uses crt;
Var S,i : integer ;
Begin
For i:= 2 to 20 do
Begin
If i mod 2= 0 do
Write(i);
End;
Readln
End.
3/ Program Hotboy
Uses crt;
Var S,i : integer ;
Begin
For i:= 2 to 20 do
Begin
If i mod 2<> 0 do
Write(i);
End;
Readln
End.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
