Сайт констукторы дегеніміз не​

Завдання №2

var i,j,k,shlth:integer;    
      letter:char;
      name,minword,s1,x,x1:string;    
      f1,f2:text;    
      f:boolean;    
      arr:array [1..100] of string;
label 1;  

begin
writeln('Введіть імя файлу введення:');
readln(name);
assign(f1,name); reset(f1);
writeln('Введіть імя файлу виводу:');
readln(name);
assign(f2,name); rewrite(f2);
writeln('Введіть букву для пошуку:');
readln(letter);
letter:=lowercase(letter);
 j:=1;  

while not eof(f1) do
begin  
readln(f1,x1);  
x:=lowercase(x1);  
i:=1;  
while (i<=length(x)) and (x[i] <> letter) do  
 begin    
  while (i<=length(x)) and (x[i] = ' ') do inc(i);    
  if (i<=length(x)) and (x[i] <> letter) then      
   while (i<=length(x)) and (x[i] <> ' ') do inc(i);  
 end;    
 if i>length(x) then
  begin
   writeln(f2,x1);
   arr[j]:=x1;  
   inc(j);  
  end;
end;  

f:=false;
for k:=1 to j do
begin  
 i:=1;  
 while (i<=length(arr[k])) and (arr[k][i] = ' ') and not f do inc(i);
 if i<length(arr[k])+1 then begin f:=true; goto 1; end;
end;  

1: if not f then writeln('У файлі f2 немає слова, відповідного умові вибору') else
begin
 while (arr[k][i]<>' ') and (i<=length(arr[k])) do
  begin
  minword:=minword+arr[k][i];
  inc(i);
  end;  
 for k:=1 to j do
 begin  
  i:=1;  
  while i<=length(arr[k]) do  
   begin   
   while (i<=length(arr[k])) and (arr[k][i] = ' ') do inc(i);
   if i<=length(arr[k]) then begin shlth:=1; s1:=arr[k][i]; end;
   while (i<=length(arr[k])) and (arr[k][i] <> ' ') do begin s1:=s1+arr[k][i]; inc(i); inc(shlth);  end;
   if shlth<length(minword) then minword:=s1;
   end;
 end;
writeln('Найкоротша слово у файлі f2: ',minword);
end;    
 
close(f1); close(f2);
end.

Айнымалы —

әріп түрінде немесе әріптер тобы түрінде программаға енгізілетін және уақыт, ұзындық, баға, түс және т.б. әр түрлі мәндерді қабылдайтын программадагы сандық шама;

белгілі бір мәліметтер типін сақтай алатын және программаны атқару барысында мәнін өзгертуге болатын атауы белгілі объект.

[1]

Айнымалылар әдетте кіші латын немесе грек әріптерімен (индекстерімен болуы мүмкінами) белгіленеді: {\displaystyle x,~y,~\varepsilon }{\displaystyle x,~y,~\varepsilon }.

Өзгеру облысы айнымалылардың сәйкес әріптермен, бірақ ирек жақшамен алынып белгіленеді: {\displaystyle \left\{x\right\},~\left\{y\right\},~\left\{\varepsilon \right\}}{\displaystyle \left\{x\right\},~\left\{y\right\},~\left\{\varepsilon \right\}}.

Айнымалы және тұрақты шама

А й н ы м а л ы шама — әр түрлі сан мәндерін қабылдайтын шама. Ал сан мәні өзгеріссіз қалатын шама т ұ р а қ т ы шама деп аталады. Дегенмен айнымалы шама мен тұрақты шаманың арасындағы айырмашылық салыстырмалы түрде болады. Өйткені кейбір мәселедегі тұрақты шама, басқа бір жағдайда айнымалы шама болуы мүмкін.

Айнымалы шаманы математикаға енгізіп, оны жүйелі түрде зерттеуді бастаған француз ғалымы Рене Декарт (1596 — 1650) болды. Айнымалы шаманың негізінде өзгеріс пен қозғалыс жатыр. Сондықтан тұрақты шама математикасынан айнымалы шама математикасына көшу ғылыми ойлаудағы үлкен төңкеріс болды. Сөйтіп, интегралдық және дифференциалдық есептеу әдістері арқылы процестер мен өзгерістерді зерттеуге мүмкіндік жасалды. Кейде айнымалы шамалар арасындағы байланысты функция деп те атайды. Математика онан әрі дамыған сайын зерттелетін функциялар саны да көбеюде.[2]

Тәуелсіз және тәуелді

Зерттелетін мәселелерде бірден артық айнымалылар болса тәуелсіз және тәуелді айнымалыларға ажыратылады.Тәуелді айнымалылар тәуелсіз айнымалылардың(аргументтердің) функциясы ретінде қарастырылады.Жоғарыда мысалға келтірілген қозғалыста, егер h биіктіктің t уақытқа тәуелділігі зерттелетін болса, онда тәуелсіз айнымалы - t уақыт болып есептеледі, ал тәуелді айнымалы t-ның функциясы - h биіктік болады; егер жылдамдықтың биіктікке тәуелділігі зерттелетін болса, онда биіктік тәуелсіз айнымалы, ал жылдамдық h-тың функциясы болады.Сонымен, айнымалы тек бір-біріне ғана қатысты тәуелді немесе тәуелсіз болады, бұлардың айырмашылығы есептің

Объяснение:

вот