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.

2 tháng 5 2021

a,Thứ tự sắp xếp đúng là 9,10,1,12,11,3,4,5,6,7,8,2,13,14

b,Công dụng để tính tổng các số chẵn lớn hơn 50

2 tháng 5 2021

nhỏ nha bạn nhầm:<<

 

16 tháng 3 2023

Program Tong__nghich__dao;

Var

n,i:real;

S:Integer;

Begin

Write('Nhap n=');Readln(n);

S:=0;

For i:=1 to n do S:=S+1/i;

Write('Tong can tim la: ', S:6:2);

Readln;

End.

16 tháng 3 2023

:v

6 tháng 5 2018

bài 1

if <điều kiện> then <câu lệnh>;

if <điều kiện> then <câu lệnh1> else <câu lênh 2>;

for <biến đềm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;

while <điều kiện> do <câu lệnh>;

bài 2

a)xuất giá tri biến c;

b) xuất chử c ra màn hình

c)xuất tong 5+7 ra màn hình tức 12;

d) xuất 5+7 ra màn hình;

e)Khai báo biến i và k thuộc kiểu số thực;

bài 3

C[1]+C[2]=150 0 0 11

bài 4 Nhờ ban khác nhé

7 tháng 5 2018

thank you

26 tháng 2 2021

Program HOC24;

var i,n,s: integer;

begin

writeln('Chuong trinh tinh tong S = 1 + 2 +3 +...+ n');

write('Nhap so n;'); readln(n);

s:=0; i:=1;

while i<n do

begin

s:=s+i;

i:=i+1;

end;

writeln('Tong cua ',n,' so tu nhien dau tien s = ',s);

readln

end.

uses crt;

var i,n,s:integer;

begin

clrscr;

write('Nhap n='); readln(n);

s:=0;

i:=0;

while i<=n do 

begin

i:=i+1;

s:=s+i;

end;

writeln(s);

readln;

end.

1 tháng 12 2020

Lệnh 1: 8

Lệnh 2: FALSE

Lệnh 3: 3

Lệnh 4: ______3.00

Lệnh 5: ______3.33

Lệnh 6: TRUE

Lệnh 7: TRUE

Lệnh 8: TRUE

20 tháng 10 2018

chắc có hoặc ko?

20 tháng 10 2018

ha