Viết câu lệnh lặp for … do tính tổng các số lẻ trong phạm vi từ 1 đến 20.
K
Khách
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.
Những câu hỏi liên quan
3 tháng 3 2021
Bài 1:
uses crt;
var n,i:integer;
s:real;
begin
clrscr;
write('Nhap n='); readln(n);
s:=1;
for i:=1 to n do
s:=s*i;
writeln(n,'!=',s:0:0);
readln;
end.
4 tháng 4 2023
1).
program oken;
uses crt;
var n,i: integer;
gt: qword;
begin
write('nhap n: '): readln(n);
gt:=1;
for i:=1 to n do gt:=gt*i;
writeln('N!=',gt);
readln;
end.
2).
program tongcacsole;
uses crt;
var t,i:longint;
begin
clrscr;
for i:=1 to 203 do
if i mod 2 = 1 then t:=t+i;
write(t);
end.
3).
program tongcacsochan;
uses crt;
var t,i:longint;
begin
clrscr;
for i:=1 to 20 do
if i mod 2 = 0 then t:=t+i;
write(t);
end.
TL
4
27 tháng 2 2021
begin
A:=0;
for i:=1 to 20 do A:= A+i*2;
writeln (' tong =',A);
readln;
end.
6 tháng 4 2022
#include <bits/stdc++.h>
using namespace std;
long long n,i,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
if (i%2!=0) t+=i;
cout<<t;
return 0;
}
5 tháng 1 2022
Câu 1:
uses crt;
var i,t:integer;
begin
clrscr;
t:=0;
for i:=1 to 20 do
if i mod 4=0 then t:=t+i;
writeln(t);
readln;
end.
Câu 2:
uses crt;
var i,dem:integer;
begin
clrscr;
dem:=0;
for i:=1 to 20 do
if i mod 3=0 then dem:=dem+1;
writeln(dem);
readln;
end.
9 tháng 3 2023
#include <bits/stdc++.h>
using namespace std;
int main()
{
int n,t=0;
cin>>n;
for (int i=1; i<=n; i++)
if (i%6==0) t+=i;
cout<<t;
return 0;
}
6 tháng 4 2022
#include <bits/stdc++.h>
using namespace std;
long long n,i,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
if (i%2==0) t+=i;
cout<<t;
return 0;
}
HY
1
30 tháng 12 2021
#include <bits/stdc++.h>
using namespace std;
int t,i;
int main()
{
t=0;
for (i=1; i<=20; i++)
if ((i%3==0) and (i%2==1)) t=t+i;
cout<<t;
return 0;
}
For i:=1 to 20 do if i mod 2=1 then t:=t+i;
T:=0;
for i:= 1 to 20 do
If i mod 2 = 1 then tong:=i + T;