Предмет: Информатика, автор: AngeBushar1509

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

Ответы

Автор ответа: BlRdS
0
Program z1; 
var x:integer;
      y:real;
begin
Writeln('Введите x');
readln(x);
y:=1/(x-15);
writeln(x:5:2);
readln;
end.
Похожие вопросы
Предмет: Қазақ тiлi, автор: anar0707
Предмет: Математика, автор: eva4541
Предмет: Алгебра, автор: МариянБ