Ai giỏi tin giúp em với ạ Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất.N cũng được nhập từ bàn phím

thuong1302

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 23 xem

1 trả lời

Thích Trả lời

tphyeutpl

var a:array[1..100000] of longint; n,i,k:longint; procedure sort(l,r: longint); (Thủ tục xắp xếp)

var i,j,x,tg: longint;

begin i:=l;j:=r;x:=a[(l+r) div 2];

repeat while a[i]<x do i:=i+1;

while x<a[j] do j:=j-1; if i<=j then begin

tg:=a[i];a[i]:=a[j]; a[j]:=tg;i:=i+1;j:=j-1;end;

until i>j; if l<j then sort(l,j);

if i<r then sort(i,r); end; begin read(n);

for i:=1 to n do read(a[i]); sort(1,n);

write(a[n]);

(in ra số cuối cùng trong dãy tăng dần là lớn nhất)

readln;

end.

Vote (0) Phản hồi (0) 2 năm trước

tuxedo862003

uses crt;

var a,b:integer;

begin

clrscr;

write( 'nhap n= '); readln(n);

write( 'nhap a= '); readln(a);

write( 'nhap b= '); readln(b);

if (a<b) then write (a) else write(b);

write('so lon nhat la n= ', n);

readln

end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

ghi tên cây từ số 1 đến số 23 hộ mình với ạ

. *Giải bài toán bằng cách lập phương trình: Một tổ san xuất theo kế hoạch mỗi ngày phải sản xuất 20 sản phẩm. Khi thực hiện mỗi ngày tổ đã sản xuất được 25 sản phẩm. Do đó dã hoàn thành trước kế hoạch 1 ngày và còn vuợt mức 5 sản phẩm. Hỏi theo kể hoạch tổ phải sản xuất bao nhiêu sản phẩm?

nguyên nhân gây ra các khuyết tật của phương pháp đúc NHẤN MẠNH "NGUYÊN NHÂN"

Câu 1 : Em hãy nêu cách ứng xử của bản thân trong các tình huống sau : - Bạn học ngồi cùng bàn thường xuyên đi học muộn , quên không làm bài tập , chưa biết bố trí thời gian học tập và vui chơi hợp lí . Câu 2 : Em có nhận xét gì về việc bảo vệ môi trường và tài nguyên thiên nhiên ở trường và ở địa phương em ? - Theo điều khoản 4 điều 12 Nghị định 100/2019/NĐ-CP thì hành vi cá nhân đổ rác ra đường bộ không đúng nơi quy định bị phạt tiền là bao nhiêu ? - Là học sinh, em sẽ làm gì góp phần bảo vệ môi trường và tài nguên thiên nhiên ? - Em hãy nêu cách ứng xử của bản thân trong các tình huống sau : a, Nhìn thấy ban vứt khẩu trang , xả rác bên lề đường b, Thấy người dân vất xác động vật chết hoặc túi ni lông xuống sông, hồ ? Mong mọi người giúp với ạ !! AI TRẢ LỜI HAY VÀ KHÔNG CHÉP MẠNG THÌ MÌNH CHO CTRLHN !

câu 3 nha nnnnnntgvbghjtyghbghmygh

chứng minh đẳng thức : a, `1/{n(n+1)} = 1/n - 1/{n+1}` b, tính nhanh : `1/{1.2} + 1/{2.3} + 1/{3.4} +.....+ 1/{9.10}`

nêu cấu trúc thì hiện tại hoàn thành

Viết một đoạn văn( 6-7 câu bằng tiếng anh) nói về hoạt động của gia đình em trước và sau khi bão tới

Khi nào điốt phát sáng và phản quang Giúp mk vs ạ

một cái bể nước dạng hình hộp chữ nhật có kích thước trong lòng bể là chiều rộng 16m chiều dài 24m nếu bể chứa 864m3 nước thì mực nước bằng 75% chiều cao của bể tính chiều cao của bể

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến