Помогите!Вот короче прога для вычисления выражения, уже составлена(снизу) **...

0 голосов
40 просмотров

Помогите!Вот короче прога для вычисления выражения, уже составлена(снизу) на 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.


image

Информатика (27 баллов) | 40 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
var
a,y:double;
begin
write('Введите a и y:');
readln(a,y);
if (y=7) then 
write('Решения нет') 
else
write('z =',(5+a)/(7-y));
end.
(1.4k баллов)
0

Спасибо. Это мне как раз и надо было!