VIẾT CHƯƠNG TRÌNH TÍNH TỔNG BÌNH PHƯƠNG CÁC SỐ CHẴN TỪ 1 ĐẾN N. ko spam, ko coppy🥰
2 câu trả lời
program Tinhtong;
uses crt;
var s,n,i: integer;
begin clrscr;
writeln('Nhap n'); readln(n);
s:= 0;
For i:= 1 to n do
if i mod 2 = 0 then s:= s+i;
writeln('Tong la', s); readln(s);
end.
program bt;
uses crt;
var i,n,s:integer;
begin
clrscr;
writeln(' Nhập n : ' );Readln(n);
S:=0;
For i:=1 to n do
begin
if (i mod 2) = 0 then s:=s+i;
Writeln('Tổng S: ,S);readln;
- Đề 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
