nngudkova1970
?>

решить и запрограммировать задачу на языке Турбо Паскаль: найти наибольшее значение функции y=a*x²+b*x-2*c при изменении x от –4, 2 до 20 с шагом 0, 8. a=2, 19; b=-4, 21; c=3, 25 .

Информатика

Ответы

poiskmarina
Var a:array [1..10, 1..10] of integer;
       i, j, max, min, imin, imax, jmin, jmax:integer;
begin 
   imax:=0; imin:=0; jmax:=0; jmin:=0; 
   max:=-maxint;  min:=maxint; 
   for i:=1 to 10 do   
      begin   
         for j:=1 to 10 do     
            begin     
            a[i,j]:=random(89)+10;     
            write(a[i,j],' ');     
            if a[i,j]<min then        
               begin        
                    min:=a[i,j];        
                    imin:=i;        
                    jmin:=j;        
               end;     
               if a[i,j]>max then        
                  begin        
                       max:=a[i,j];        
                       imax:=i;        
                       jmax:=j;        
                  end;     
               end;     
               writeln;     
            end;
   writeln;
   writeln('Максимальный элемент:',max);
   writeln('Его индекс ',imax,' ',jmax);
   writeln('Минимальный элемент:',min);
   writeln('Его индекс ',imin,' ',jmin);
end.
victoria-112296363

Эти языки близки к Python своей динамической семантикой, но настолько различаются своим подходом к синтаксису, что их сравнение превращается почти в религиозный спор: является ли скудость синтаксиса Lisp преимуществом или недостатком? Следует заметить, что Python имеет интроспективную совместимость подобную к аналогичной у Lisp, а программы на Python могут конструировать и исполнять элементы программ на лету.

Обычно практичность является решающим фактором: Common Lisp большой (во всех смыслах), а мир Scheme разделяется на множество несовместимых версий, тогда как Python имеет единую, свободную, компактную реализацию.

Объяснение:

Объяснение:

УДАЧИ С ЛЮБОВЬЮ EXLENG❤

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

решить и запрограммировать задачу на языке Турбо Паскаль: найти наибольшее значение функции y=a*x²+b*x-2*c при изменении x от –4, 2 до 20 с шагом 0, 8. a=2, 19; b=-4, 21; c=3, 25 .
Ваше имя (никнейм)*
Email*
Комментарий*