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.

23 tháng 12 2018

tổng của 100 số đt:

var i,b:integer;

begin

b:=0;

for i:=1 to 100 do

b:=b+i;

writeln('Tong cua 100 so dt:', b);

readln;

end.

11 tháng 2 2020

tổng của 100 số đt:

var i,b:integer;

begin

b:=0;

for i:=1 to 100 do

b:=b+i;

writeln('Tong cua 100 so dt:', b);

readln;

end.

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

Output: Tổng của chúng

3.2: 

Input: hai số x,y

Output: Giá trị của hai số sau khi hoán đổi

17 tháng 12 2020

1: Hoán đổi giá trị hai biến x và y

Chúng ta sẽ gán biến trung gian tam cho x, xong rồi gán biến trung gian tam đó cho y; rồi sau đó gán y ngược lại cho x, và xuất kết quả ra-đó chính là x và y sau khi hoán đổi cho nhau.

2: Tìm giá trị lớn nhất của dãy A

Chúng ta sẽ gán biến ln cho a[1], sau đó sẽ quét qua các phần tử trong mảng xem thử có phần tử nào lớn hơn ln thì gán ln cho phần tử đó. Sau cùng xuất ln ra, ta được số lớn nhất cần tìm.

23 tháng 12 2020

Lời giải :

B1: nhập 2 biến x,y

B2: Nếu x>y tráo đổi gía trị của x và y, chuyển đến bước 3 . Nếu y > x thì 2 số đã theo thứ tự có giá trị không giảm , chuyển đến bước 3

B3: In ra kết qủa x, y và kết thúc thuật toán 

18 tháng 12 2022

Var x,y: integer;
Begin
Writeln('nhap 2 so nguyen x va y: '); Readln(x,y);
x:=x+y;
y:=x-x;
x:=y;
Writeln('so x sau hoan doi= ',x);
Writeln('so y sau hoan doi= ',y);
end.

18 tháng 12 2022

Có 2 cách là nay vs cái gửi trc nhưng cách này ổn hơn nha
Var x,y,t: integer;
Begin
Writeln('nhap 2 so nguyen x va y: '); Readln(x,y);
x:=t;
y:=x;
y:=t;
Writeln('so x sau hoan doi= ',x);
Writeln('so y sau hoan doi= ',y);
end.

Ví dụ 6. Tìm số lớn nhất trong dãy A các số a1, a2, ..., an cho trước.Ta sẽ dùng biến MAX để lưu số lớn nhất của dãy A. Việc xác định MAX có thể được thực hiện như sau: Đầu tiên gán giá trị a1 cho biến MAX. Tiếp theo, lần lượt so sánh các số a2, ..., an của dãy A với MAX. Nếu ai> MAX, ta gán ai cho MAX.INPUT: Dãy A các số ai, a¿, ..., a„ (n >]).OUTPUT: Giá trị MAX = max{ay, 4ạ,..., a„Ì.Từ đó, ta có thuật toán...
Đọc tiếp

Ví dụ 6. Tìm số lớn nhất trong dãy A các số a1, a2, ..., an cho trước.

Ta sẽ dùng biến MAX để lưu số lớn nhất của dãy A. Việc xác định MAX có thể được thực hiện như sau: Đầu tiên gán giá trị a1 cho biến MAX. Tiếp theo, lần lượt so sánh các số a2, ..., an của dãy A với MAX. Nếu ai> MAX, ta gán ai cho MAX.

INPUT: Dãy A các số ai, a¿, ..., a„ (n >]).
OUTPUT: Giá trị MAX = max{ay, 4ạ,..., a„Ì.
Từ đó, ta có thuật toán sau:
Bước 1. MAX← a1; i←1.
Bước 2. Nếu ai> MAX, gán MAX← ai.
Bước 3. i←i+ 1.
Bước 4. Nếu i≤n, quay lại bước 2.
Bước 5. Thông báo giá trị MAX và kết thúc thuật toán.

Dưới đây minh hoạ thuật toán trên với trường hợp chọn thỏ nặng nhất trong bốn chú thỏ có trọng lượng tương ứng là 2, 1, 5, 3 ki-lô-gam.

0
Ví dụ 6. Tìm số lớn nhất trong dãy A các số a1, a2, ..., an cho trước.Ta sẽ dùng biến MAX để lưu số lớn nhất của dãy A. Việc xác định MAX có thể được thực hiện như sau: Đầu tiên gán giá trị a1 cho biến MAX. Tiếp theo, lần lượt so sánh các số a2, ..., an của dãy A với MAX. Nếu ai> MAX, ta gán ai cho MAX.INPUT: Dãy A các số a1, a2, ..., an (n >1).OUTPUT: Giá trị MAX = max{a1, a2,..., an}.Từ đó, ta có thuật toán...
Đọc tiếp

Ví dụ 6. Tìm số lớn nhất trong dãy A các số a1, a2, ..., an cho trước.

Ta sẽ dùng biến MAX để lưu số lớn nhất của dãy A. Việc xác định MAX có thể được thực hiện như sau: Đầu tiên gán giá trị a1 cho biến MAX. Tiếp theo, lần lượt so sánh các số a2, ..., an của dãy A với MAX. Nếu ai> MAX, ta gán ai cho MAX.

INPUT: Dãy A các số a1, a2, ..., an (n >1).
OUTPUT: Giá trị MAX = max{a1, a2,..., an}.
Từ đó, ta có thuật toán sau:
Bước 1. MAX← a1; i←1.
Bước 2. Nếu ai> MAX, gán MAX← ai.
Bước 3. i←i+ 1.
Bước 4. Nếu i≤n, quay lại bước 2.
Bước 5. Thông báo giá trị MAX và kết thúc thuật toán.

Dưới đây minh hoạ thuật toán trên với trường hợp chọn thỏ nặng nhất trong bốn chú thỏ có trọng lượng tương ứng là 2, 1, 5, 3 ki-lô-gam.

0
18 tháng 12 2021

a: 

Input: a

Output: |a|