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

1. с клавиатуры вводится число х. найти значение y=1/x.

Ответ:

sweet690

29.06.2020 07:52

Program chik;
var x,y:real;
begin
readln(X);
if(x<>0)then begin
y:=1/x;
writeln(y);
end;
if(x=0)then writeln('FALSE');
end.

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

Популярные вопросы: Информатика

alexaval1980p08mu0

28.05.2021 12:50

В программе «:=» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно операции сложения, вычитания, умножения и деления. Правила выполнения операций...

rageworker

30.04.2021 22:13

Почему существует несколько программ архиваторов...

mkazancev228

05.10.2022 05:10

Какой вид графики обладает высокой точностью передачи градаций цветов и полутонов...

GangsterSkrillex

10.04.2022 13:00

Для самостоятельной работы: 1. имеются два числа. a) вычислите сумму и разность этих чисел, используя два оператора readln. b) перепишите программу так, чтобы использовался...

azmamatovm

10.04.2022 13:00

Составить программу для вычисления значений функции f(x) на отрезке [а, b] с шагом h(через цикл while ). результат представить в виде таблицы, первый столбец которой...

BRAJJ

12.03.2020 23:59

Влинейном массиве вычислить сумму произведения всех пар соседних чисел....

Møŝķá56

12.03.2020 23:59

Составить блок-схему и программу паскаль cоставить программу, сообщающую о возможности построения параллелограмма из отрезков x,y,z,t данные 1 , 2 , 1 , 2 можно 7 , 5...

elenaway2002

12.03.2020 23:59

Для чего используются команды цикла? как записывается команда цикла for? как в цикле записать команду присваивания, чтобы она вычисляла сумму чисел? количество? какое...

urspacce

13.03.2023 03:35

Как придумать 2 повествовательные предложения,2 побудительные предложения,2 вопросительные предложения ,2 восклицательные предложения...

viktordro95

13.03.2023 03:35

Икт. основы информатики . страница 51,51 83...

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

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