Напишите на языке Паскаль программу вычисления y по формуле: y=2x-5/x-1, где x - данное целое число.
Напишите на языке Паскаль программу вычисления y по формуле: y=2x-5/x-1, где x - данное целое число.
Ответ(ы) на вопрос:
var
x,y:real;
begin
readln(x);
if x=0 then
begin;
write('Divided by zero');
exit;
end;
y:=2*x-5/x-1;
writeln(y);
end.
Не нашли ответ?
Похожие вопросы