Var {Файл 1.txt необходимо создать } n,i,j,c1:integer; a:array[1..100] of integer; f:text; begin {чтение данных с файла 1.txt} assign(f,'1.txt'); reset(f); i:=0; while not eof(f) do begin i:=i+1; read(f,a[i]); end; n:=i; close(f); {Сортировка} for i:=1 to n-1 do for j:=i+1 to n do if a[i]>a[j] then begin c1:=a[j]; a[j]:=a[i]; a[i]:=c1; end; {вывод в файл 2.txt отсортированного массива} assign(f,'2.txt'); rewrite(f); for i:=1 to n do write(f,a[i]:5); close(f);
Если кажется что есть талант то можно его сначала проявить дома перед семьей, потом перед друзьями. Выступить на каких нибудь конккурсах или на празднике в школе. После окончания школы можно поступить в институт ы котором будут учить становится артисткой. После того как выучишься. Можешь идти в театр или другое заведение и пусть там проверят твои навыки атистизма.Если ты пройдешь будешь сначала выступать в маленьких театрах и маленьких сценах.Потом все будет прибавляться и популярность твоя будет увеличиваться.
int main() { int a,b,c; cout <<"Введите три числа: ", cin >> a >> b >> c; a = (a>b?b:a); a = (a>c?c:a); cout <<"Min = "<< a << "\n"; system("Pause"); return 0; }
#include<iostream> using namespace std;
int main() { int A; cout << "Ââåäèòå òð¸õçíà÷íîå ÷èñëî: ", cin >> A; cout << (A / 100 == A % 10?"Ñîâïàäàþò":"Íå ñîâïàäàþò")<<"\n"; system("Pause"); return 0; }
{Файл 1.txt необходимо создать }
n,i,j,c1:integer;
a:array[1..100] of integer;
f:text;
begin
{чтение данных с файла 1.txt}
assign(f,'1.txt'); reset(f);
i:=0;
while not eof(f) do
begin
i:=i+1;
read(f,a[i]);
end;
n:=i;
close(f);
{Сортировка}
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]>a[j] then
begin
c1:=a[j];
a[j]:=a[i];
a[i]:=c1;
end;
{вывод в файл 2.txt отсортированного массива}
assign(f,'2.txt'); rewrite(f);
for i:=1 to n do
write(f,a[i]:5);
close(f);
end.