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.

8 tháng 11 2021

TL : 

Số cuối - số đầu : khoảng cách + 1

100 - 2 ( số chẵn đầu tiên ) : 2 ( vì tính số chẵn ) + 1 = 50

~HT~

31 tháng 12 2020

Bn xem đúng k nhé:

Bước 1: MAX =60 I=1Bước 2: nếu MAX >I thì I:= I+1 , ngược lại kết thúc chương trìnhBước 3: nếu MAX > I kết thúc chương trìnhINPUT: 60 số tự nhiên đầu tiênOUTPUT: tính tổng

Chúc bn hok tốt~~

31 tháng 12 2020

E cần nêu rõ phép chia nhé. Đồng thời em cần fix bước 4 để khoa học hơn

3 tháng 1 2022

- Bài này mình viết ở ngôn ngữ C++

- Chương trình :

#include<iostream> 

using namespace std; 

int main() { 

int g = 0; 

for (int i = 100; i <= 1000; i++) {

if (i % 2 == 0) { 

g += i;

 } 

}

cout << g; 

return 0; 

}

#include <bits/stdc++.h>

using namespace std;

long long i,t;

int main()

{

t=0;

for (i=100; i<=200; i++)

if (i%2==0) t=t+i;

cout<<t;

return 0;

}

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;
}

 

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.

26 tháng 12 2021

Input: 10 số tự nhiên đầu tiên

Output: Tổng của chúng

26 tháng 12 2021

Còn phần sau nữa thì sao ạ, giúp với ạ:(

27 tháng 12 2022

*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.

a) Mô tả thuật toán:

-Bước 1: Nhập n và nhập dãy số

-Bước 2: dem←0; t←0; i←1;

-Bước 3: Nếu a[i] mod 2=0 thì dem←dem+1 và t←t+a[i];

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

-Bước 5: Nếu i<=n thì quay lại bước 3

-Bước 6: Xuất dem, t

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

14 tháng 5 2021

giúp mk với