viết chương trình tìm giá trị nhỏ nhất trong 2 số a và b
Những câu hỏi liên quan
viết chương trình tìm giá trị nhỏ nhất trong 3 số a,b,c nhập từ bàn phím sử dụng hàm tìm số nhỏ nhất trong 2 số x và y
uses crt;
var a,b,c,nn:integer;
//chuongtrinhcon
function min(var x,y:integer):integer;
begin
if x<y then min:=x
else min:=y;
end;
//chuongtrinhchinh
begin
clrscr;
readln(a,b,c);
nn=min(a,b);
nn=min(nn,c);
writeln(nn);
readln;
end.
Đúng 1
Bình luận (0)
Sử dụng chương trình con tìm số nhỏ nhất của 2 số. Viết chương trình sử dụng chương trình con trên tìm và đưa ra màn hình giá trị nhỏ nhất của các số tự nhiên trong tệp kiemtra.txt lưu trên ổ đĩa Y. Giúp e vs mn ơi
uses crt;
const fi='kiemtra.txt'
var f1:text;
a:array[1..100]of integer;
min,n,i:integer;
{----------------chuong-trinh-con-------------------}
function nn(x,y:integer):integer;
begin
if x<y then nn:=x
else nn:=y;
end;
{-----------------chuong-trinh-chinh-----------------}
begin
clrscr;
write('nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
min:=nn(a[1],a[2]);
for i:=3 to n do
if min>a[i] then min:=a[i];
writeln(min);
readln;
end.
Đúng 0
Bình luận (0)
Mình xin sửa lại một chút:
uses crt;
const fi='kiemtra.txt'
var f1:text;
a:array[1..100]of integer;
min,n,i:integer;
{----------------chuong-trinh-con-------------------}
function nn(x,y:integer):integer;
begin
if x<y then nn:=x
else nn:=y;
end;
{-----------------chuong-trinh-chinh-----------------}
begin
clrscr;
assign(f1,fi); reset(f1);
readln(f1,n);
for i:=1 to n do
read(f1,a[i]);
min:=nn(a[1],a[2]);
for i:=3 to n do
if min>a[i] then min:=a[i];
writeln(min);
readln;
end.
Đúng 0
Bình luận (4)
Bài 1: Viết chương trình con tìm giá trị nhỏ nhất của 2 số nguyên a và b
Bài 2:Viết chương trình con tính cạnh huyền c với 2 cạnh góc vuông a,b nhập từ bàn phím
Giúp em giải gấp với ạ
Bài 1:
function min(a,b:longint):longint;
begin
min:=a;
if min>b then min:=b;
end;
Bài 2:
function canhhuyen(a,b:real):real;
var c:real;
begin
c:=sqrt(sqr(a)+sqr(b));
canhhuyen:=c;
end;
Đúng 2
Bình luận (0)
Viết chương trình có sử dụng hàn tìm số nhỏ nhất trong 2 số cho biết giá trị nhỏ nhất trong 2 số nhập từ bàn phím
#include <bits/stdc++.h>
using namespace std;
long long a,b;
int main()
{
cin>>a>>b;
cout<<min(a,b);
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình tìm giá trị nhỏ nhất trong dãy A gồm N số nguyên (N không quá 100), nhập từ bàn phím (yêu cầu: sử dụng hàm tìm số nhỏ nhất trong 2 số x và y) Dùng pascal ạ mn giúp mình với!!!
uses crt;
var a:array[1..100]of integer;
i,n,min:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
min:=a[1];
for i:=1 to n do
if min>a[i] then min:=a[i];
writeln(min);
readln;
end.
Đúng 0
Bình luận (0)
Sử dụng chương trình con tìm số nhỏ nhất của 2 số. Viết chương trình sử dụng chương trình con trên tìm và đưa ra màn hình giá trị nhỏ nhất của mảng một chiều chứa n số nguyên nhập từ bàn phím. Giúp em với mọi người ❤️
uses crt;
var a:array[1..100]of integer;
min,n,i:integer;
{----------------chuong-trinh-con-------------------}
function nn(x,y:integer):integer;
begin
if x<y then nn:=x
else nn:=y;
end;
{-----------------chuong-trinh-chinh-----------------}
begin
clrscr;
write('nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
min:=nn(a[1],a[2]);
for i:=3 to n do
if min>a[i] then min:=a[i];
writeln(min);
readln;
end.
Đúng 0
Bình luận (0)
viết chương trình nhập vào 1 dãy gồm n số nguyên ( n<= 100)
a) xuất dãy vừa nhập
b) điền phần tử có giá trị nhỏ nhất trong dãy và tìm vị trí của phần tử đó
Câu 6. Xác định Input, output, mô tả thuật toán và viết chương trình giải các bài toán:
a. Sắp xếp 2 số a, b theo thứ tự không tăng, không giảm.
b.Tìm giá trị lớn nhất, nhỏ nhất trong 3 số a, b, c.
- Bài 1: Cho tệp bai1.inp gồm 4 số nguyên. Hãy viết chương trình và ghi ra file bai1.out gồm 1 số là giá trị lớn nhất trong 4 số đó. - bài 2: Cho tệp bai2.inp gồm 4 số nguyên. Hãy viết chương trình và ghi ra file bai2.out gồm 1 số là giá trị nhỏ nhất trong 4 số đó - Bài 3: Cho tệp bai3.inp gồm 1 số nguyên là thời gian tính bằng giây để làm một công việc nào đó. Hãy viết chương trình và ghi ra file bai3.out gồm 3 số tương ứng với số giờ, phút , giây tương ứng được quy đổi.
Đọc tiếp
- Bài 1: Cho tệp bai1.inp gồm 4 số nguyên. Hãy viết chương trình và ghi ra file bai1.out gồm 1 số là giá trị lớn nhất trong 4 số đó.
- bài 2: Cho tệp bai2.inp gồm 4 số nguyên. Hãy viết chương trình và ghi ra file bai2.out gồm 1 số là giá trị nhỏ nhất trong 4 số đó
- Bài 3: Cho tệp bai3.inp gồm 1 số nguyên là thời gian tính bằng giây để làm một công việc nào đó. Hãy viết chương trình và ghi ra file bai3.out gồm 3 số tương ứng với số giờ, phút , giây tương ứng được quy đổi.
Viết chương trình dùng để tìm giá trị nhỏ nhất trong 10 phần tử số nguyên nhập từ bàn phím
Xem chi tiết
uses crt;
var a:array[1..10]of integer;
i,min:integer;
begin
clrscr;
for i:=1 to 10 do
begin
write('A[',i,']='); readln(a[i]);
end;
min:=a[1];
for i:=1 to n do
if min>a[i] then min:=a[i];
writeln(min);
readln;
end.
Đúng 0
Bình luận (0)
Program HOC24;
var i,min: integer;
a: array[1..10] of integer;
begin
for i:=1 to 10 do
begin
write('Nhap phan tu thu ',i,': '); readln(a[i]);
end;
min:=a[1];
for i:=2 to 10 do if min>a[i] then min:=a[i];
write('So nho nhat trong 10 phan tu so nguyen da nhap la: ',min);
readln
end.
Đúng 2
Bình luận (1)
Program Cau2;
Uses crt;
Var i,n,max,min: integer;
a: array[1..100] of integer;
Begin
Clrscr;
Write(‘ Nhap do dai cua day so, n= ‘);
Readln(n);
Writeln(‘Nhap cac phan tu cua day so: ‘);
For i:= 1 to n do
Begin
Write(‘a[‘, i, ‘]= ‘);
Readln(a[i]);
End;
Đúng 0
Bình luận (6)