Câu 1:Hãy mô tả thuật toán tìm số nhỏ nhất trong dãy A các số a1,a2,…,an cho trước
Câu 2:Tìm lỗi sai và sửa trong chương trình sau:
Begin
Program vd
Uses crt;
Clrscr;
Writeln (‘Chao cac ban!’)
End.
readln
Câu 1:Hãy mô tả thuật toán tìm số nhỏ nhất trong dãy A các số a1,a2,…,an cho trước Câu 2:Tìm lỗi sai và sửa trong chương trình sau: Begin
By Emery
Câu $1$
$Input:$ dãy số $a1,a2,…an$
$Output : $ $Min$
Thuật toán
$B1$ : nhập $n$ là số phần tử
$B2$ : cho biến $i $ chạy từ $1-> n$=> nhập các phần tử có trong dãy
$B3$ : gán $Min:=A[1];$
$B4$ : cho biến $i$ chạy từ $2-> n$
Nếu $Min > A[i] => Min:=A[i];$
$B5$ : in ra kết quả và kết thúc thuật toán
Câu $2$
Begin
Program vd
Uses crt;
Clrscr;
Writeln (‘Chao cac ban!’)
End.
readln
sửa
Program vd;
Uses crt;
Begin
Clrscr ;
Writeln(‘chao cac ban’);
Readln
End.
Câu 1:
– Xác định bài toán:
Input: Số N và dãy N số a1, a2, ..,aN.
Output: Giá trị nhỏ nhất (Min) của dãy số.
– Ý tưởng:
Khởi tạo giá trị Min = a1.
Lần lượt nhận giá trị /i từ 2 đến N, so sánh giá trị số hạng a1 với giá trị Min, nếu ai < Min thì Min nhận giá trị mới ai
– Thuật toán:
Mô tả thuật toán theo cách liệt kê:
Bước 1. Nhập N và dãy a1….aN;
Bước 2. Min <- ai, i <- 2
Bước 3. Nếu i > N thì đưa ra giá trị Min rồi kết thúc;
Bước 4.
Bước 4.1: Nếu ai < Min thì Min <- ai
Bước 4.2: i <- i+1 rồi quay lại bước 3
Câu 2:
Program vd;
Begin;
Uses crt;
Clrscr;
Write(‘Chao cac ban!’);
Readln;
End.