составить программу которая вычисляет значение z=x/y где y=sinx+0,5. в случае y=0

Составить программку которая вычисляет значение z=x/y где y=sinx+0,5. в случае y=0 вывести на печать сообщения дробленье на 0

Задать свой вопрос
1 ответ
Program zzz;
var z,x,y: real;
begin
writeln ('Введите x');
readln (x);
y:=sin(x)+0.5;
z:=x/y;
if y=0 then writeln ('Разделенье на ноль') else
writeln ('z=',z);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт