Регистрация
Войти
Стать экспертом Правила
Информатика

Помогите!Вот короче прога для вычисления выражения, уже составлена(снизу) на PascalABC.NET, надо ввести оператор if.Мне училка сказала, вот введи оператор if, потому что если введём y = 7, то выведет ответ как "бесконечность", а как мы знаем ещё на 0 делить нельзя. Так вот надо ввести оператор if чтоб при вводе y = 7 он нам выдал надпись, что решения нет(на 0 делить нельзя).Если вы меня поняли, то попытайтесь пожалуйста сделать.Мне училка сказала что там ещё 2 команды дописать надо и всё!Спасибо!

Сама прога на PascalABC.NET :
var
a,y:double;
begin
write('Введите a и y:');
readln(a,y);
write('z = ',(5+a)/(7-y));
end.

ОТВЕТЫ
var
a,y:double;
begin
write(Введите a и y:);
readln(a,y);
if (y=7) then 
write(Решения нет) 
else
write(z =,(5+a)/(7-y));
end.
159
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам