Вычислить у = 1/(2-x) в pascal abc СРОЧНО!
Вычислить у = 1/(2-x) в pascal abc СРОЧНО!
Гость
Ответ(ы) на вопрос:
ГостьProgram PR1;
uses crt;
var x:real;
begin
clrscr;
writeln('Vvedite x');
readln(x);
writeln('Y=',1/(2-x));
end.
Не нашли ответ?
Похожие вопросы