Написать программу вычисления значения выражения у=2/х в Паскале

2

Ответы и объяснения

  • Участник Знаний
2014-02-14T17:34:15+00:00
2014-02-14T17:40:49+00:00
Var
x,y:real;
Begin
Writeln('Введите значение x: ');
Readln(x);
y:=2/x;
Writeln('Значение y: ',y);
End.