Question

Паскаль надо решить ,сделать програмку y=2sinx+0,5

Answer 1

Var x,y:real;
begin
  readln (x);
  y:=2*sin(x)+0.5;
  writeln (y);
end.

Answer 2

Uses crt;
var x, y:real;
begin
write('x='); read(x);
y:=2*sin(x)+0.5;
write('y=',y);
end.

Answer 3

Для решения данной задачи необходимо написать программу на языке Паскаль, которая вычисляет значения функции y = 2sin(x) + 0.5 для заданных значений аргумента x.

Приведу пример кода, который может решить данную задачу:

scssCopy code
program sin_function;

uses Math;

var
  x, y: real;

begin
  write('Введите значение аргумента x: ');
  readln(x);

  y := 2 * Sin(x) + 0.5;

  writeln('Значение функции y = 2sin(x) + 0.5 при x = ', x, ' равно: ', y);

  readln;
end.

В этом коде используется встроенная функция Sin(x) из библиотеки Math для вычисления синуса аргумента x, который затем умножается на 2 и прибавляется 0.5 для получения значения функции y. Значение x вводится пользователем с клавиатуры с помощью команды readln(), а результат выводится на экран с помощью команды writeln().