program ct;
uses crt;
var i,n,max:integer;
A:array [1..100] of integer;
begin
clrscr;
write('nhap do dai day so:'); readln(n);
writeln(' nhap cac phan tu cua day so');
for i:=1 to n do
write('a[',i,']='); readln(a[i]);
end;
max:=a[1];
for i:=2 to n do
if max<a[i] then max:=a[i];
writeln('gia tri max',max);
readln;
end.
Program tim_max ;
Uses crt ;
Var i,n,max: integer ;
A: array [1..150] of integer ;
Begin
Write('nhap so luong phan tu cua day so , n=');
Readln (n);
For i:=1 to n do
Write ('nhap phan tu thu ',i,' =');
Readln (A[i]);
Max:= A[1];
For i:=2 to n do
If A[i]> max then
Max:=A[i];
Writeln('gia tri lon nhat cua day so la:', max);
Readln
End.
Mọi người chỉ mình cách sử dụng cấu trúc, dấu hiệu nhận biết câu điều kiện loại 1;2; thì quá khứ hoàn thành và cách sử dụng "so/because "
Cho tam giác ABC vuông tại A. Tia phân giác của góc B cắt cạnh AC ở D. a/ So sánh AB và AD
Một thợ gò có một cái thùng không nắp dạng hình lập phương có cạnh là 7,5m. Tính diện tích xung quanh, diện tích toàn phần và Thể tích của thùng tôn
giải giúp mình câu 5. Lưu ý: giải bằng tam giác đồng dạng nhé! cảm ơn nhiều ạ
Em cần gấp ạ mong mọi người giải giúp em
Chứng minh cho a bé hơn b 2a + 3 bé hơn 2b + 3
Cho đa thức fx=2x-x2+2|x+1| a) Thu gọn đa thức f(x) b) Tính f(-3/2)
sin^6x+cot^6x=1-3 sin^2x x cos^2x
giúp mk với mơn trước cần gấp nha
Trong cá thịt gạo chứ nhiều chất j
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
