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.

uses crt;

var i,t:integer;

begin

clrscr;

t:=0;

for i:=100 to 200 do 

  if i mod 2=1 then t:=t+i;

writeln(t);

readln;

end.

#include <bits/stdc++.h>
using namespace std;
long long test;
int main() {
    ios_base::sync_with_stdio(false);
    cin.tie(NULL);
    cout.tie(NULL);
cout<<((199-101)/2+1)*(199+101)/2;
return 0;
}

 

a: Input: Dãy các số nguyên

Output: Tổng của dãy đó

c: 

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,t;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n; i++)

{

cin>>x;

t=t+x;

}

cout<<t;

return 0;

}

c: 

#include <bits/stdc++.h>

using namespace std;

long long i,n,t,j;

bool kt;

int main()

{

t=0;

for (i=2; i<=50; i++)

{

kt=true;

for (j=2; j*j<=i; j++)

if (i%j==0) kt=false;

if (kt==true) t=t+i;

}

cout<<t;

return 0;

}

27 tháng 12 2020

Mô tả thuật toán: 

-Bước 1: i←0; s←1;

-Bước 2: i←i+1;

-Bước 3: s←s*i;

-Bước 4: Nếu i<=100 thì quay lại bước 2

-Bước 5: Xuất s

-Bước 6: Kết thúc

Viết chương trình thì kiểu dữ liệu của 100 số tự nhiên đầu tiên là lớn quá bạn

27 tháng 12 2020

*Mô tả thuật toán:

- Bước 1: s <- 1

- Bước 2: i <- 1 đến 100 thì s <- s*i

- Bước 3: Xuất s

- Bước 4: Kết thúc thuật toán

*Viết chương trình:

Program tinh;

Uses crt;

Var s: longint;       

       i: integer;

Begin

Clrscr;

s:=1;

For i:=1 to 100 do s:=s*i;

Writeln(s);

Readln;

End.

19 tháng 12 2021

c: 

#include <bits/stdc++.h>

using namespace std;

double a,b;

int main()

{

cin>>a>>b;

cout<<a*b;

return 0;

}

#include <bits/stdc++.h>

using namespace std;

long long a[10],i,t;

int main()

{

t=0;

for (i=1; i<=10; i++)

cin>>a[i];

for (i=1; i<=10; i++) if (a[i]%2!=0) t+=a[i];

cout<<t;

return 0;

}

 

21 tháng 11 2017

program bai1;

uses crt;

var a,b,c,s: real;

begin

clrscr;

write('nhap so thu nhat ='); readln(a);

write('nhap so thu hai ='); readln(b);

write('nhap so thu ba ='); readln(c);

s:=a+b+c;

writeln('tong ba so a,b,c =',s:4:2);

readln;

end.

21 tháng 11 2017

program bai1;

uses crt;

var n: integer;

begin

clrscr;

write('nhap so n ='); readln(n);

if n mod 2 = 0 then

writeln('la so chan ') else

writeln('la so le ');

readln;

end.