var a: array[1..250] of integer;
max: integer;
i, n: byte;
Begin
Write('N = '); readln(n);
For i:=1 to n do
Write('a[', i, '] = '); readln(a[i]);
If i=1 then max:=a[1]
Else if a[i]>max then max:=a[i]:
End;
Write('so lon nhat: ', max);
Readln
End.
program lon_nhat;
uses crt;
var A:array[1..100] of integer;
n,i,max:integer;
begin
clrscr;
write('Nhap n: '); readln(n);
for i:=1 to n do
write('Nhap so thu ',i,': '); readln(A[i]);
end;
max:=A[1];
for i:=2 to n do
if A[i]>max then max:=A[i];
write('Gia tri lon nhat la: ',max);
readln;
end.
Một thửa ruộng hình chữ nhật có nửa chu vi là 136m, chiều dài bằng 5/3 chiều rộng. a. Tính diện tích thửa ruộng đó.
Trên cùng một nữa mặt phẳng bờ chứa tia Ox, vẽ tia Ot, Oy sao cho xOt=30độ, xOy=60độ a) Trong ba tia Ox, Oy, Ot tia nào nằm giữa hai tia còn lại? Vì sao? b) So sánh tOy và xOt c) Tia Ot có phải là tia phân giác của góc xOy ko? Vì sao? d) Vẽ tia Oz là tia đối của tia Ox, khi đó tia Oy có phải là tia phân giác của góc zOt ko? Vì sao?
từ văn bản nước đại việt ta em có suy nghĩ gì về việc bảo vệ độc lập chủ quyền nước ta (Viết đoạn văn từ 8-10 câu )
viết bài văn về niềm tin là nền tảng của mọi sự thành công
Bai nay hơi kho giup minh câu3 nhé
lập bảng thống kê từ hk2 đến h nv, ngôi, .... thôi nha mk hỏi nhiều để tham khảo và chọn lọc cảm nhận của em về vai tò của cây tren hôm nay
cho tam giác ABC có số đo ba góc là A,B,C thỏa mãn điều kiện Tan A/2 + Tan B/2 + Tan C/2 = √3 tam giác ABC là tam giác j
Hấp thụ hoàn toàn 6,72 lít khí SO2 vào dd Ba(OH)2 dư thu được m gam muối .Tính m Giúp mình
Cho PT: x2 - 2x - m2 - 4 = 0 (*) a,Giải phương trình khi m = -2. b, Chứng tỏ rằng phương trình (*) có hai nghiệm phân biệt với mọi giá trị của m. c, Gọi x1, x2 là hai nghiệm của phương trình (*), tìm m để x1^2 + x2^2 = 20.
tìm câu rút gọn trong bài ca huế trên sông hương
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
