М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
likiad123
likiad123
05.06.2020 15:45 •  Информатика

Исправить ошибки в программе
у=e^-bt*sin(at+b) - sqrt|bt+a|;
s=b*sin(at^2cos(at))-1
#include
#include
#include
#define _use_math_defines
//лаб.работа 4 студента гр.3108
//привалова любовь
//вариант 18
int main()
{
printf("l.r.#4 privalova l. 18-3108-19\n");
printf("\n");
double x,b,a,y,s,t ;
printf("x="); scanf("%lf",& x);
printf("b="); scanf("%lf",& b);
printf("a="); scanf("%lf",& a);
printf("t="); scanf("%lf",& t);
y=pow(exp,-b*t)*sin(a*t+b)-sqrt(abs(b*t + a));
s=b*sin(a*double(t)*cos(a*t))-1;
printf("y=%l.4f\n",y);
printf("s=%l.4f\n",s);
printf("press and key");
getch();
}

👇
Ответ:
angelinaosadchy
angelinaosadchy
05.06.2020

:int main()

{

printf("L.r.#4 Privalova L. 18-3108-19\n");

printf("\n");

double x,b,a,y,s,t ;

printf("x=");scanf("%lf",&x);

printf("b=");scanf("%lf",&b);

printf("a=");scanf("%lf",&a);

printf("t=");scanf("%lf",&t);

y=pow(exp,-b*t)*sin(a*t+b)-sqrt(abs(b*t + a));

s=b*sin(a*double(t)*cos(a*t))-1;

printf("y=%l.4f\n",y);

printf("s=%l.4f\n",s);

printf("press and key");

getch(1);

}

Объяснение:Вроде тако не уверен

4,7(40 оценок)
Открыть все ответы
Ответ:
tskaev662
tskaev662
05.06.2020
PROGRAM B01;

CONST
    max = 11;
TYPE
    vector = array[1..max]of integer;
VAR
    M, I, K:vector;
    j:byte;

{ Массивы I,K предварительно реорганизовать следующим образом: на первом
месте, в данных массивах должен стоять элемент с минимальным значением}
procedure reorganize_vector(var vt:vector);
var   i, j:byte;
      min, tmp:integer;
      
begin
  // вначале ищем минимальный элемент и запоминаем его место в массиве
  j:=1;//
  min:=vt[1];//назначаем наименьшим - первый элемент
  for i:=2 to max do
    if (min>vt[i]) then begin
      min:=vt[i];
      j:=i;//индекс наименьшего числа
    end;
    
  // теперь меняем местами первый элемент массива с наименьшим числом
  tmp := vt[1];//запоминаем значение первого элемента
  vt[1] := min;//меняем его на наименьший элемент
  vt[j] := tmp;//на место наименьшего ставим значение из первого элемента
end;

// процедура для вывода массива на экран
procedure print_vector(var vt:vector);
var j:byte;
begin
  for j:=1 to max do
    write(vt[j]:6);
  writeln(' ');
end;

BEGIN
  writeln('Дано:');

  //заполняем массивы случаынйми данными
  randomize;
  for j:=1 to max do begin
    I[j]:=random(-128,127);  
    K[j]:=random(-128,127);  
  end;

  //выводим их на экран
  write('массив I[',max,']: ');
  print_vector(I);
  write('массив K[',max,']: ');
  print_vector(K);

  writeln(' ');
  writeln('Реорганизовать массивы так, чтобы на первом месте ');
  writeln('должен стоять элемент с минимальным значением');

  reorganize_vector(I);
  reorganize_vector(K);

  write('массив I[',max,']: ');
  print_vector(I);
  write('массив K[',max,']: ');
  print_vector(K);

  writeln(' ');
  writeln('Сформировать массив М[',max,'], элементы которого вычисляются');
  writeln('по формуле M[j] = I[j] + K[j]');

  for j:=1 to max do
    M[j] := I[j] + K[j];

  write('массив M[',max,']: ');
  print_vector(M);
END.

На паскале написать программу с подпрограммой. дано: массивы i(11), k(11). сформировать массив м (11
4,7(81 оценок)
Ответ:
mashka710
mashka710
05.06.2020
целый целый R := A + B
тип результата: целый

целый целый R := A - B
тип результата: целый

целый целый R := A * B
тип результата: целый 

целый целый R := A / B
тип результата: вещественный

целый целый A > B
тип результата: логический (true/false)

целый целый A < B
тип результата: логический (true/false)

вещественный вещественный R := A + B
тип результата: вещественный

вещественный вещественный R := A - B
тип результата: вещественный

вещественный вещественный R := A * B
тип результата: вещественный

вещественный вещественный R := A / B
тип результата: вещественный

вещественный вещественный A > B
тип результата: логический (true/false)

вещественный вещественный A < B
тип результата: логический (true/false)
4,5(3 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ