Напишите программу на языке Паскаль для вычисления значения y по следующему правилу: если x меньше или равно нулю

  • 30
Напишите программу на языке Паскаль для вычисления значения y по следующему правилу: если x меньше или равно нулю, то значение y равно 0, в противном случае значение y равно x. Запустите программу и введите значение x равное -14. Какое число будет выведено на экран?
Gosha
41
Конечно! Для выполнения данной задачи напишем программу на языке Паскаль, которая будет вычислять значение переменной y согласно указанным правилам.

pascal
program CalculateY;

var
x, y: integer;

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

if x <= 0 then
y := 0
else
y := x;

writeln("Значение переменной y равно: ", y);
end.


Данная программа сначала запрашивает значение переменной x. Затем она проверяет, является ли x меньше или равным нулю. Если это условие выполняется, то значение переменной y присваивается нулю. В противном случае, значение переменной y присваивается значению переменной x. Затем программа выводит значение переменной y на экран.

Теперь запустим программу и введем значение x равное -14:


Введите значение x:
-14
Значение переменной y равно: 0


Таким образом, на экран будет выведено число 0.