program Tim_so_nho_nhat;
var x,y,z: longint;
begin
Clrscr;
write('Nhap so x= ');readln(x);
write('Nhap so y= ');readln(y);
write('Nhap so z= ');readln(z);
min:=x;
if min>y then min:=y
else if min>z then min:=z;
writeln('So nho nhat la ',min);
readln;
end.
Thuật toán:
Bước 1: Nhập x, y, z từ bàn phím
Bước 2: min ← x
Bước 3: Nếu y<min thì min ← y
Bước 4: Nếu z<min thì min ← z
Bước 5: Xuất kq là min
Chương trình:
Program BTT;Uses crt;Var x,y,z,min: longint;Begin Clrscr; Write('Nhap x, y, z: '); Readln(x,y,z); min:=x; If y<min then min:=y; If z<min then min:=z; Write('GTNN la: ',min); ReadlnEnd.
viết văn về có ý kiến cho rằng khi thói sống ích kỷ trở thành lối sống của con người thì tinh thần hi sinh vì cộng đồng .tình yêu thương đồng loại,sự sẻ chia với người khác chỉ còn là những giá trị lạc lõng là đúng hay sai?vì sao?
cho tam giác ABC có A=90¤ có AB=12cm,AC=16cm. lấy M là trung điểm của BC. lấy N đối xứng với M qua BC a) tính BC, AM b) tứ giác AMCN là hình gì? tính chu vi AMCN c) tìm điều kiện tầm giác ABC để AMCN là hình vuông
Em được cô giao cho 1 đề này , mong các bạn giúp cho với
Viết chương trình tính quãng đường ab biết vị trí và thời gian nhập vào từ bàn phím là số nguyên dương
Con moi dang nay thoi giup m nhe
tại sao chế độ XHCN ở Liên xô và đông âu lại sụp đổ
Cho C= x/2x-2 + x^2+1/2-2x^2 a) Tìm x để biểu thức C có nghĩa b) Rút gọn C c) Tìm giá trị x của C= -1/2 Giúp giùm tớ nha!!!
Giải dùm mình câu 5 với câu 6b với
bài 1:cho một gương phẳng và vật AB. a.phải đặt vật A'B' cung chiều với vật?(vẽ hình). b. phải đặt vật như thế nào để anh A'B' ngược chiều với vật ?(vẽ hình). giúp mình với
Bí kiếp để chạy bền tốt là gì
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
