12,6 cos ( x-y/|x+2y|)^2+e^2x *y записать виде паскаль

Знания

Информатика

1 ответ:

Елена Мазанова4 года назад

0 0

Читайте также

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

isar [2]

Такой будет программа:

var
s, r, t, x, y: real;

begin
y:=1;
x := 5 + abs(y);
s := (x / 100000) * y * y * y * y;
r := (y + 1000) / sqrt(x);
t := 3 * x + y;
writeln('S= ', s);
writeln('R= ', r);
writeln('T= ', t);
if (s < r) and (r < t) then writeln('Наименьшее - S') else if (r < s) and (r < t) then writeln('Наименьшее - R') else writeln('Наименьшее - T');
end.

0 0

4 года назад

Различия между "ВОРОМ" и "ХАКЕРОМ" И различия между "ВИРУСОМ( болезнь )" и "ВИРУСОМ-КОМПЬЮТЕРНЫМ"

Руслан19912345 [7]

Вор варует - хакер взламывает Вирусболезнь это живое - вирус компьютерный не живое

0 0

3 года назад

Как нарисовать трапецию в Ворде

krialex [17]

Открываете ворд → вставка → фигуры → выбираете нужную фигуру

-------------------------
Конечно, все зависит от версии, но метод вставки фигур примерно одинаковый.

Скриншоты помогут

0 0

4 года назад

Составьте программу по квадратному уравнению y=х2+7х+7

Алёна лелька

A=1
b=7
c=7
d=b^2-4*z*c
if d>0 then x1=(-b-sqr(d))/2*a:x2=(-b+sqr(d))/2*a:Print x1,x2
if d=0 then x=-b/2*a:Print x
if d<0 then Print "Нет решения"

Вот это просто алгоритм можно сказать а на каком языке вы хотите

0 0

3 года назад

Ввести с клавиатуры 2 разных целых числа. Найти меньшее из них. Результат вывести на экран. VBA

Roman Belokonev [2.4K]

Sub aaa()
    a = CDbl(InputBox("первое число"))
    b = CDbl(InputBox("второе число"))
    MsgBox "минимум двух чисел " + CStr(IIf(a > b, b, a))
End Sub

0 0

3 года назад