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

Написать программу расчета формулы на языке Паскаль: z=1+х^2/y


Написать программу расчета формулы на языке Паскаль: z=1+х^2/y

tata535268 tata535268    2   26.11.2020 19:59    3

Ответы
yastremskayaal yastremskayaal  12.02.2021 18:51

program Formula;

var z, x, y:Real;

begin

Write('Vvadite X '); ReadLn(x);

Write('Vvedite Y '); ReadLn(y);

z:=(1+Sqrt(X))/y;

WriteLn('Z budet ravno ',z:3:4,)

end.

Объяснение:

не нужно благодарностей

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Alina55332 Alina55332  11.07.2019 22:10
50 ! решить по информатике: 80 бит= ? байт 5,5мбайт-? байт 7гбайта -? кбайт 3байт-? бит 1/2мбайт-? байт...
raisa3yusif raisa3yusif  28.09.2019 19:10
Разделить указанные ниже предложения на 2 столбца (высказывания) , (предложения не являющееся высказываниями) 1) кто автор этой книги? 2) 2*х=10 3) 8+2=10 4) собака бежала...
quipklack quipklack  28.09.2019 19:10
Сколько мбайтов составляют 231 битов?...
kelenad1999 kelenad1999  28.09.2019 19:10
2. практическая работа по переводу чисел из одной системы счисления в другую. 1) переведите числа из десятичной системы счисления в двоичную, восьмеричную и шестнадцатеричную...
pminikrolik pminikrolik  17.02.2021 08:55
Составить программу вычисления выражения согласно указанному варианту. Предусмотреть вывод информации о выбранной ветви вычислений....
anastasiyakorc anastasiyakorc  14.05.2020 08:48
. Напишите программный код. Даны стороны прямоугольника a и b. Найти его площадь S = a•b и периметр P = 2•(a + b). Данные вводятся с клавиатуры....
nastyabelova01 nastyabelova01  14.05.2020 08:48
4. У исполнителя Омега две команды, которым присвоены номера: 1. прибавь 2; 2. умножь на b (b — неизвестное натуральное число; b ≥ 2). Выполняя первую из них, Омега увеличивает...
OgoKatya OgoKatya  14.05.2020 08:48
Инструмент для приближения или удаления точки камеры a) Layout b) Масштаб c) Вращение d) Ластик...
ЯнаКорягина ЯнаКорягина  06.05.2020 12:53
Является ли условным оператором следующая последовательность символов? if x if x =y then x:=0; y:=0 else write(z) if x...
smaliar2004 smaliar2004  06.05.2020 12:53
составить программу с циклом!...

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