24,26,28,42,46,48,62,64,68,82,84,86
Var
i:integer;
min:real;
a:array[1..3]of real;
begin
for i:=1 to 3 do
begin
writeln(i,' число:');
readln(a[i]);
if i=1 then min:=a[1];
if a[i]<min then min:=a[i]
end;
writeln('Наименьшее: ',min)
<span>end.</span>
наименование-это по другому название
<span>for (i=0; i printf("%i ", fun1(mas[i]); тут что-то странное написано</span>