Войти Регистрация Спроси ai-bota

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

Нажмите на рекламу ниже и сразу увидите ответ

↓

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

1232960

24.10.2021 07:03

Алг нач цел¬таб dat[1: 10] цел к, m dat[1] : = 2 dat[2] : = 5 dat[3] : = 7 dat[4] : = 5 dat[5] : = 4 dat[6] : = 2 dat[7] : = 0 dat[8] : = 2 dat[9] : = 4 dat[10] : =...

помогитебиология

24.10.2021 07:03

Паскаль очееь надо 1) дан одномерный массив, найти количество элементов которые заканчиваются на 7. 2) дано 2 массива найти сумму и произвидение в каждом массиве, найти...

Танрпол

24.10.2021 07:03

Паскаль. найти сумму всех четных двузначных чисел(написать программу)...

stashea

24.10.2021 07:03

Решить в паскале abc ( важно) условие в коробке лежат карандаши количество может быть разное, покупатель покупает от 1 до 3 карандашей включительно(нужно сделать так...

Мельник20331

18.10.2021 22:00

Радиус шарика R измерили с точностью 0,1 см и получили 1,2 см. Затем рассчитали его объём по формуле V = 4 π R³ /3 = 7,23822947387088... Запишите ответ в этой задаче,...

kristinkalubaya

22.11.2022 11:20

Дано натуральное число n .найти минимальную цифру числа....

JaikLong

22.11.2022 11:20

Дано натуральное число n.найти минимальную цифру....

ttttt1509999

31.01.2023 22:01

Для чего используется кодирование при передаче информации по каналам связи по этапам от источника информации до получателя? Поясните разницу между первичным и канальным...

andreevaa995

11.03.2020 23:47

Почему в качестве количественной меры энтропии и информации выбрана не функция вероятности, а ее логарифм?...

ruslana0404

07.03.2021 19:36

Как Вы думаете, для чего в теории информации используется понятие «энтропия», взятое из термодинамики? Указать, как минимум, две причины....

Ответ:

Stasburlakov

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.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку