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.

GL
9 tháng 4 2023

uses crt;

var s,i:integer;

begin

s:=0;

for i:=1 to 100 do s:=s+i;

write('Tong cac so tu 1 den 100 la: ',S);

readln;

end.

6 tháng 4 2023

For i:=1 to n do S=S+i; -> S=S+(1+2+3+4) = 12 + (1+2+3+4) = 22

-> D

5 tháng 4 2023

Đây là chương trình mình viết bằng ngôn ngữ C++, mình sử dụng biến mảng a đánh số từ 0 tới 45. Khi in ra màn hình thì số điểm của mỗi học sinh sẽ viết trên mỗi dòng.
CODE:

#include <iostream>

using namespace std;
int a[45];
int main()
{
    for(int i=0;i<45;i++){
        cin>>a[i];
    }
    for(int i:a){cout<<i<<endl;}
    return 0;
 

2 tháng 4 2023

Program HOC24;

var a: array[1..1000] of integer;

i,n,tg,j: integer;

begin

write('Nhap so phan tu cua day : '); readln(n);

for i:=1 to n do

begin

write('a[',i,'=');

readln(a[i]);

end;

for i:=1 to n do if a[i] mod 2=1 then

for j:=i to n do

if a[i]>a[j] then

begin

tg:=a[i];

a[i]:=a[j];

a[j]:=tg;

end;

write('Day sau khi sap xep la: ');

for i:=1 to n do if a[i] mod 2=1 then write(a[i],' ');

readln

end.

28 tháng 3 2023

Program HOC24;

var i,n: integer;

s: real;

begin

write('Nhap N: '); readln(n);

s:=0; i:=1;

while i<=n do

begin

s:=s+1/(i*2);

i:=i+1;

end;

write('S= ',s:6:2);

readln

end.

27 tháng 3 2023

Chọn C