Паскаль. Даны целые числа x и y. Вычислить: (x-y)/(1+xy)
10-11 класс
|
var a,x,y:real;
begin
read(x,y);
y:=(x-y)/(1+x*y);
writeln(y);
end.
Другие вопросы из категории
1. На остановке стоит человек в ожидании автобуса №3.Какое кол-во информации несет сообщение о том, что к остановке подъехал автобус №4?(
а) 1 бит;
б) нулевая информация;
в) ненулевая информация;
г) 4 бита;
д) 2 бита.)
2.Как называют изменение поведения системы, направленное на достижение цели при её взаимодействии с внешним миром?
записей случайных чисел 100
1. Написать
программу для нахождения числа нечетных элементов в массиве из 10 беззнаковых
чисел.
датчиков и передачи информации
закодировать последовательность символов ГАВБ и записать результат в десятичной системе счисления, то получится
Читайте также
1–12, введенное с клавиатуры (1 — январь, 2 — февраль и т. д.). Вывести название соответствующего времени года («зима», «весна», «лето», «осень»).
2, Напишите программу, реализующую следующие вычисления. Дана матрица размера M x N (числа вводятся с клавиатуры). Для каждого столбца матрицы найти произведение его элементов. Полученные значения вывести в текстовый файл.
3, Напишите программу с использованием функции CircleS(R) вещественного типа, находящей площадь круга радиуса R (R — вещественное). С помощью этой функции найти площади трех кругов с данными радиусами. Площадь круга радиуса R вычисляется по формуле S = πR2.
4, Напишите программу, реализующую следующие вычисления. Дано целое число N (1≤N≤26), введенное с клавиатуры. Вывести N первых прописных (то есть заглавных) букв латинского алфавита.
31, мм - целое число из диапазона от 1 до 12, а гг - целое число из диапазона от 1 до 2020 (если какая-то часть формата нарушена, то данная подстрока в качестве даты не рассматривается.) Заменить каждую дату сообщения на дату следующего дня. Написать программу на Паскале. Сроооооооооооооочнооо. Пооожалуйста.....
Проверить истинность высказывания: «Ладья за один ход может перейти с одного поля на другое». 2) Дано трехзначное число. Проверить истинность высказывания: «Все цифры данного числа различны». 3)Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения. Вывести новые значения переменных A и B.
(x-1)(x-3)(x-7)...(x-63)/(x-2)(x-4)(x-8)...(x-64) (дробь)
Используя оператор: while
Не могу написать через данный оператор программу на паскаль, выходит всегда число 0. Прошу помочь мне :)