2 câu trả lời
Program BTH;
uses crt;
var s,i:longint;
Begin
clrscr;
For i:=5 to 75 do
Begin
If i mod 2=0 then s:=s+i;
end;
Writeln('Tong day so tren la: ',s);
readln;
end.
Mình trình bày dễ nhìn rồi đó :>>>
Cho mình xin câu tl hay nhất nhé :)))
program baitap;
var s, i: integer;
begin
for i:= 5 to 75 do
if i mod 2 = 0 then s:=s+i;
write(s);
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
