Регистрация
antoncezame
09.10.2020 00:17
Информатика
Есть ответ 👍

Составить программу вычисляющую последовательность значений функции y=7x^2-14/x+a, где х принадлежит промежутку от [-10, -3]

173
325
Посмотреть ответы 2

Ответы на вопрос:

дизиль
дизиль
4,6(63 оценок)
Var x: array[1..8] of integer : = (-10, -9, -8, -7, -6, -5, -4, -3);     i,a: integer; y: real; begin  writeln('a='); readln(a);     for i: =1 to 8 do      begin      y: =7*sqr(x[i])-14/x[i]+a;       writeln('x[',i,']= ',y);     end; end.     
CassyBelka
CassyBelka
4,4(97 оценок)
Var a,i,min,mina: integer; begin   i: =0;   repeat     write ('number = ');     readln(a);     inc(i);       if (a< 0) and (a< mina) then       begin            min: =i;         mina: =a;       end;   until a> 0;   writeln ('index min: ',min);   readln; end.

Популярно: Информатика