Построить на языке c программу для табулирования функции задаваемой системой уравнений c условиями: - id288251520220511 от sun54 11.05.2022 18:14

Question

Информатика: Построить на языке c программу для табулирования функции задаваемой системой уравнений c условиями: w=sqrt(at^2+bsint+1) ,при t 0,1 w=at+b при, t=0,1 w=sqrt(at^2+b*cost+1) ,при t 0,1 t[-1; 1] шаг табуляции : i=0,2 (изменение t) a=2,5 b=0,4 я могу решить на pascal,но на с не могу ваш ! заранее ! при необходимости могу составить вам блок схему алгоритма . (cообщите в комментарие)

sun54 · Accepted Answer

//Pascal
var a,b, I, maxsumm, max : integer;

function summdel(x:integer):integer; //результат - сумма делителей х
var k,sum:integer;
begin
    sum:=0;
    for k := 1 to x div 2 + 1 do
      if x mod k = 0 then sum:= sum+k;
    summdel:=sum;
end;

begin
   writeln('Введите границы a,b ');
   readln(a,b);
    maxsumm := 1;
    max := 1;
    for i := a to b do
     begin
        if summdel(i) > maxsumm then
          begin maxsumm:= summdel(i);
            max := i;
          end;
     end;
     writeLn('Максимальная сумма делителей - ', maxsumm, ' число - ',max)
end.

MOGZ ответил