В той же папке, где будет программа, создаете два блокнота, называете input и output
a:array[1..10000] of integer;
i, k, min, imin:integer;
begin
assign(input,'input.txt');
reset(input);
assign(output,'output.txt'); { если в тот же, то assign(input,'input.txt');
rewrite(output); rewrite(input);}
for i:=1 to 10 do
read(a[i]);
min:=a[1];
for i:=1 to 10 do
if min>a[i] then begin min:=a[i]; imin:=i; end;
writeln;
writeln(min,' ', imin);
end.
задание вписать в тот же файл делаю впервые, поэтому за правильность вывода не отвечаю.
Var
i:integer; s,a:real;
Begin
Write('Вводите числа через Enter ');
for i:= 1 to 5 do
Begin
Read(a);
s:=s+a;
End;
Writeln;
write('Среднее арифметическое этих чисел ');
if s/5>6 then write('больше 6 и равняется ',s/5,', поэтому увеличиваю на 3 - ',s/5+3) else write('не больше 6, поэтому оставляю как есть ',s/5);
End.
//Я сделаль
#include <bits/stdc++.h>
using namespace std;
int main()
{
cout << " 1 \n";
cout << "------\n";
cout << " M \n";
cout << " MMM \n";
cout << "MMMMM\n";
cout << " M M \n";
cout << " MMM \n";
cout << "------\n";
cout << " 2 \n";
cout << "------\n";
cout << "M \n";
cout << "MM \n";
cout << "MMMMMM\n";
cout << " MM\n";
cout << " M\n";
cout << "------\n";
cout << " 3 \n";
cout << "------\n";
cout << "M M\n";
cout << " M M \n";
cout << " MMMMM \n";
cout << " M M M \n";
cout << " MMMMM \n";
cout << "------\n";
cout << " 4 \n";
cout << "------\n";
cout << " M\n";
cout << " MM\n";
cout << " MMM\n";
cout << " MMMMM\n";
cout << "MMMMMMM\n";
cout << "------\n";
cout << " 5 \n";
cout << "------\n";
cout << "M M\n";
cout << "MM MM\n";
cout << "MMMMM\n";
cout << "MM MM\n";
cout << "M M\n";
}
Сначала 2 разбойника,потом 2 купца,а потм разбойникаим купца.Итого 3 рейса)ЕСЛИ НЕ ТРУДНО,ОТМЕТЬ,КАК ЛУЧШЕЕ)))