试编写一个程序，输入4个数，打印出这4个数中的最小数

program ex-1;
var a:array['a'..'d']of integer;
c,d,e:char;
begin
for c:='a' to 'd' do read(a[c]);
for c:='a' to 'c' do
for d:=c to 'd' do
if a[c]<a[d] then begin
e:=a[c]; a[c]:=a[d]; a[d]:=e;
end;
writeln(a['d']);
end.

不知道你是不是学的C语言，这是C语言中较简单的两种
法一：
#include<stdio.h>
void main()
{
int min(int x,int y);
int a,b,c,d;
scanf("%d%d%d%d",&a,&b,&c,&d);
a=min(a,b);
a=min(a,c);
a=min(a,d);
printf("%d\n",a);
}
int min(int x,int y)
{
int z;
z=(x<y)?x:y;
return(z);
}

法二：

#include<stdio.h>
void main()
{
int min,i;
int a[4];
for(i=0;i<4;i++)
scanf("%d",&a[i]);
min=a[0];
for(i=0;i<4;i++)
{
if(a[i]<min)
min=a[i];