Question

Полный ответ пожалуйста!!! Составьте программу,вычисляющую значение функции y=a^{2} +3a+1 , при вводимом значении a . (ПАСКАЛЬ)

Answer 1

Var a,y:integer; 
begin 
writeln('Введите число a'); 
read(a); 
y:=sqr(a)+3*a+1; 
writeln('Значение y = ',y); 
end.

Answer 2

Var i,j:integer;
begin   
readln(i);
j=(i*i)+(i*3)+1;
writeln(j);
end.

Answer 3

Конечно, давайте напишем программу на языке Pascal, которая будет вычислять значение функции \(y = a^2 + 3a + 1\) при вводимом значении \(a\). В Pascal программа может выглядеть следующим образом:

program CalculateFunction;

var
  a, y: real;

begin
  // Вводим значение переменной a
  write('Введите значение a: ');
  readln(a);

// Вычисляем значение функции
  y := a * a + 3 * a + 1;

// Выводим результат
  writeln('Значение функции при a = ', a, ' равно ', y);

// Ждем нажатия клавиши перед завершением программы
  readln;
end.

Эта программа просит пользователя ввести значение переменной \(a\), затем вычисляет значение функции \(y\) согласно вашей формуле и выводит результат на экран.