Question

1. Напишите программу для вычисления выражения y=4x-9, где х целое число, вводимое с клавиатуры. Вывод оформите следующим образом: при

X= ... Y=...

2. Напишите программу для вычисления значения выражения у= √х-2х(все под корнем) где к целое х число, вводимое с клавиатуры. Вывод оформите в виде x=... Y=...

Паскаль

Answer 1

1.
program Expression1;

var x, y: integer;

begin

 writeln('Введите значение x: ');

 readln(x);

 y := 4 * x - 9;

 writeln('При x = ', x, ' y = ', y);

end.

2.
program Expression2;

var x, y: integer;

begin

 writeln('Введите значение x: ');

 readln(x);

 y := round(sqrt(x - 2 * x));

 writeln('При x = ', x, ' y = ', y);

end.