Viết chương trình tính tổng sau S=1-2+3-4.....-n
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Bài 2:
a: Input: 50 số từ 1 đến 50
Output: Tổng các số nguyên tố
c: Viết chương trình:
uses crt;
var i,j,t,kt:integer;
begin
clrscr;
t:=0;
for i:=2 to 50 do
begin
kt:=0;
for j:=2 to trunc(sqrt(i)) do
if i mod j=0 then kt:=1;
if kt=0 then t:=t+i;
end;
writeln(t);
readln;
end.
uses crt;
var n,i,t,x:integer;
begin
clrscr;
readln(n);
t:=0;
while n>0 do
begin
x:=n mod 10;
if x mod 2=0 then t:=t+x;
n:=n div 10;
end;
writeln(t);
readln;
end.
uses crt;
var n:integer;
begin
clrscr;
readln(n);
if trunc(sqrt(n))=sqrt(n) then writeln('yes')
else writeln('no');
readln;
end.
Tham khảo:
Kiểm tra số hoàn hảo bằng Python
Bước 1: Yêu cầu người dùng nhập số cần kiểm tra bằng hàm input()
Bước 2: Lặp từ 1 đến N – 1, tính tổng tất cả các ước số của N trong khoảng đó.
Bước 3: Nếu tổng bằng N thì N chính là số hoàn hảo.
uses crt;
var i,n,t:integer;
begin
clrscr;
t:=0;
for i:=1 to 100 do
if i mod 3=0 then
begin
write(i:4);
t:=t+i;
end;
writeln;
writeln(t);
readln;
end.
Viết thân thôi hen
Var n,i,s:integer;
Read(n);
s:=0;
For i:=1 to n do
If i mod 2 <>0 then s:=s+i else s:=s-i;
Write(s);
end.
mong mn giúp vs ạ
đang gấp