Viết phương trình: -Nhập vào số nguyên N -Tính tổng các số chẵn nhỏ hơn N và xuất kết quả ra màn hình
2 câu trả lời
program oken;
uses crt;
var n,chan:integer;
begin
clrscr;
write('nhap n: '); readln(n);
for i:=2 to n-1 do if i mod 2 =0 then chan:=chan+n;
writeln('tong cac so chan: ',chan);
readln;
end.
uses crt;
var i,n,tong:integer;
begin
clrscr;
write('Nhap N: ');readln(n);
tong:=0;
for i:= 1 to n - 1 do if i mod 2 = 0 then tong:=tong+i;
writeln('Tong cac so chan nho hon ',n,' la: ',tong);
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
