Составить программу вычеслений значения функции:
y={1при x больше или равно 0;
{0 при x<0;
одна фигурная скобка если что ! Составить эту программу в паскале турбо!пожалуйста
Ответы
Ответ дал:
0
Если я парвильно понял задание, то вот
var x,y : integer;
begin
readln(x);
if x>=0 then y:=1
esle y:= 0;
writeln(y);
end.
Похожие вопросы
2 года назад
7 лет назад
10 лет назад
10 лет назад