Задать вопрос
20 декабря, 02:49

Введите число если введенное число не отрицательное то найдите квадратный корень из числа иначе вычислите обратное число

+1
Ответы (1)
  1. 20 декабря, 05:28
    0
    Var a:integer; c:real; Begin Readln (a) ; If a>=0 then c:=sqrt (a) Else c: = 1/a; Write (c) ; End.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Введите число если введенное число не отрицательное то найдите квадратный корень из числа иначе вычислите обратное число ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Напишите программу вывода на экран фразы "Число положительное", если введенное число положительное, и "Число отрицательное", если введенное число отрицательное.
Ответы (1)
Введите число, если оно не отрицательное, то найдите каадратный корень, иначе вычислите обратное число.
Ответы (1)
1) Проверка условия и ветвление в алгоритме. Напишите программу которая анализирует введённое с клавиатуры число и выдает на экран: а) удвоенное значение числа, если число положительное; б) абсолютное значение числа, если число отрицательное.
Ответы (1)
Задача 1 - Дано целое число. Если оно положительное, вывести " Число положительное ", если отрицательное вывести "Число отрицательное ", если равно 0 - "Число равно нулю" задача 2 - дано целое число.
Ответы (1)
Помогите составить программы Введите несколько чисел. Найдите произведение чисел меньших 7. Введите несколько чисел. Найдите количество двузначных чисел. Введите несколько чисел.
Ответы (1)