1. Информатика
  2. Написать программу вычисления

Написать программу вычисления у=1/х для Pascal.

listik194 listik194    1   08.05.2020 21:14    1

Ответы
Angelina123321123321 Angelina123321123321  14.10.2020 12:09

var x,y : real;

begin

readLn(x);

if(x <> 0) then

begin

y := 1/x;

writeLn("y=", y);

end

else

writeLn("функция не существует");

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ooolyyya2001 ooolyyya2001  29.06.2019 07:00
Какие части можно выделить в компьютере...
irynks468dig irynks468dig  29.06.2019 07:00
По информатике 9 класс. огромное количество . исполнитель чертёжник перемещается на координатной плоскости оставляя след в виде линии. чертежник может выполнить команду...
усман14 усман14  08.04.2020 19:49
Введите, что будет выведено в результатевыполнения следующего фрагмента программы:а:= 10;b:= 20;c:= 30;х:= b;if 2*a b then x:= a;if 2*c x then x:= C;writeln (x):​...
Georgiy11111 Georgiy11111  19.04.2019 17:06
Сижу, ломаю голову над по информатике. суть такова: составить программу по нахождению заштрихованной области на языке паскаль(язык программирования), но при этом компьютер...
sergeu3522p09njx sergeu3522p09njx  19.04.2019 15:20
Для узла с ip-адресом 221.117.97.115 адрес сети равен 221.117.96.0. найдите наименьшее возможное количество нулей в двоичной записи маски подсети....
1992svetlana 1992svetlana  13.11.2019 13:46
Росшифровать код цезаря ефз кг сжрсёс л сжлр кг ефзш...
Яна2005561 Яна2005561  13.11.2019 13:40
Составьте блок-схему и программу вычисления значения функции y= 3x^2 - 2 / x+4 (в текстовом файле)...
taylakova090820 taylakova090820  13.11.2019 13:40
Нужно построить диаграмму последовательности. пример во вложении. только объекты будут другими: администратор договорномеруслуги​...
desna80 desna80  14.09.2021 23:14
расшифруйте фамилию известного ученого именем которого был назван язык программирования, (1.3) для раскодировки слова решите примеры, а затем используйте фрагмент дополнительноф...
AlyonaAn AlyonaAn  25.04.2020 11:37
1). Как изменится объём цилиндра, если его высоту и радиус основания увеличить в 3 раза? 2). Найдите объём конуса, если его образующая равна 17 м, а площадь осевого...

Популярные вопросы