Вычислить значение выражения 1/(x-15) для любого x.
Сделать в Pascal.

Ответ учителя по предмету Информатика

Program z1; 

var x:integer;

      y:real;

begin

Writeln(‘Введите x’);

readln(x);

y:=1/(x-15);

writeln(x:5:2);

readln;

end.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *

Похожие вопросы от пользователей