#include <iostream>
using namespace std;
int main()
{
int var1,var2;
cout << "Введите с какого числа начать=";
cin >> var1;
cout << "Введите до какого числа=";
cin >> var2;
while ( var1 < var2 )
{
cout << var1 << endl;
var1++; // подсчёт повторений цикла
}
system("pause");
return 0;
}
Двоичный код
1 = 001
2 = 010
3 = 011
4 = 100
5 = 101
6 = 0110
7 = 0111
8 = 01000
9 = 01001
10 = 01010
и так далие
Program filework;
var f:text;
i, n, count:integer;
l:string;
arr:array of real;
answ:real;
begin
assign(f, 'C:\Users\HO4HOU_TTaPKuPucT\Desktop\test_file.txt'); // В кавычках путь к файлу
reset(f);
while not eof(f) do begin
readln(f, l);
if StrToFloat(l) > 0 then
Inc(count);
end;
SetLength(arr, count);
reset(f);
i:=0;
while not eof(f) do begin
readln(f, l);
if StrToFloat(l) > 0 then begin
arr[i]:=StrToFloat(l);
Inc(i);
end;
end;
answ:=arr[0];
for i:=1 to arr.Length - 1 do
if arr[i] < answ then answ:=arr[i];
writeln(answ);
close(f);
end.
P.S. Программа работает с неограниченным числом положительных чисел в файле