viết chương trình bằng turbo pascal (có ảnh) tìm số nhỏ nhất trong 3 số a,b,c lưu ý: ko ảnh=báo cáo+1sao nội dung không phải là chương trình cũng tương tự

natachu460

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 17 xem

1 trả lời

Thích Trả lời

Kimdieuhui

uses crt;
var a, b, c, min: longint;
begin
clrscr;
write ('nhap a: '); readln (a);
write ('nhap b: '); readln (b);
write ('nhap c: '); readln (c);
if (a=b) and (b=c) then
begin
writeln ('ba so bang nhau');
readln;
exit;
end;
if a>b then min:=b;
if a<=b then min:=a;
if min>=c then min:=c;
writeln ('so nho nhat la: ',min);
readln;
end.

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

maixuannam2207

program phuongt;

uses crt;

var a, b, c, min: real;

begin

clrscr;

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

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

write('Nhap c = '); readln(c);

min:=a;

if min>b then min:=b;

if min>c then min:=c;

write('So nho nhat la: ', min);

readln

end.

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

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

Nêu bố cục và nội dung của văn nghị luận.

Một xe máy khởi hành từ Hà Nội đi Hải Phòng với vận tốc trung bình 32 km/h. Sau đó 1 giờ, một ôtô cũng khởi hành từ Hà Nội đi Hải Phòng, cùng đường với xe máy và vận tốc trung bình 48 km/h. Hãy viết phương trình biểu thị việc ôtô gặp xe máy sau x giờ, kể từ khi ô tô khởi hành.

Giải giúp e câu 6 câu 7 đi Mn ới=(((e cần gấp lắm!😢😢

tả quang cảnh sân trường em trong giờra chơi (trước giờ ra chơi, trong giờ ra chơi, sau giờ ra chơi) không chép mạng

Giải phương trình: (x - 1) - (2x - 1) = 9 - x

Sưu tầm những câu ca dao tục ngữ về thiên nhiên và lao dộng sản xuất ở Đồng nai ?

Thế nào là kiểm tra năng suất giống vật nuôi cho ví dụ

Hãy nói ra cái mong muốn của mình khi ở tuổi 20 và mình muốn cải thiện những thiếu sót của mình trong tương lai hoặc bây giờ

Vẽ sơ đồ bộ máy nhà nước thời Lê sơ. Lẹ lên giúp mik, chiều nay mik kt rùi.....

Nhờ các thầy cô giải giùm e cái ạ

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