1. Xác định bài toán
- Input: Số nguyên dương N và dãy N số nguyên a1,..., aN.
- Output: Giá trị lớn nhất Max của dãy số.
2. Thuật toán.
ĐĂNG BÀI NGAY để cùng thảo luận với các CAO THỦ trên mọi miền tổ quốc. Hoàn toàn miễn phí! Viết chương trình nhập vào một mảng n số nguyên từ bàn phím , và in ra màn hình giá trị lớn nhất và nhỏ nhất của mảng.Sử dụng lệnh while...do
Mọi người giúp mình với ạ, ngày mai mik kiểm tra rồi!!!
Last edited: 17 Tháng tư 2018
program abc; uses crt; var a,b,c,dmax : integer; begin clrscr; write [ ' nhap a =' ]; readln [a]; write [ ' nhap b = ']; readln [b]; write [ ' nhap c =' ]; readln [c]; write [ ' nhap d = ' ]; readln [d]; a:=max; if max max then max:=a;
Write[‘nhap a[‘,i,’]=‘]; Realn[a]; ...
Program GTLN;
uses crt;
var a:array[1..100] of integer;
i,max,n:integer;
begin
clrscr;
writeln['Nhap so luong phan tu mang:']; readln[n];
writeln['Moi ban nhap mang:'];
for i:=1 to n do
Readln[a[i]];
Max:=a[1];
for i:=2 to n do
if a[i]>max then max:=a[i];
writeln['so lon nhat:'];
writeln[max];
writeln;
End.
Reactions: besttoanvatlyzxz