Предмет: Информатика, автор: aneta1937

Задание 1 (50 баллов).
Составить блок-схему алгоритма и программу на Паскале для вычисления функций 2. Ввести программу в ЭВМ, вычислить
значения функции и проверить ее для самостоятельно выбранных трех пар значений переменных X и Y.
z={e^3*x*y, √3y +x>14

Ответы

Автор ответа: Стрелец03
9

Ответ:

Program test;

Var

a, b, x, y, e, z : real;

Begin;

readln (e, x, y);

z:= Exp(3*(e))*x*y;

writeln (z);

If sqrt(3*y)+x>14 then writeln ('true') else writeln ('false');

End.


Стрелец03: Program test;
Var
x, y, z, t, n, e, z1, z2, z3 : real;
Begin;
readln (e, x, y);
If sqrt(3*y)+x>14
then
begin
z1 := Exp(3*x*y);
z2 := x+3*y;
z3 := 0.5*x;
writeln (z1);
writeln (z2);
writeln (z3)
end
else
z := 0;
writeln (z);
End.
tsvetkovae: спасибо кокрас -то что надо было
Tyut123: может я не понимаю но зачем к z приравнивать 0 и его же выводить
tsvetkovae: сам не знаю но сработало
Стрелец03: Сам не знаю зачем z приравнивать к 0, но ко мне не придирались, и поэтому я оставил так.
tsvetkovae: ПОНЯТНО!!!!!!
Похожие вопросы
Предмет: Алгебра, автор: dimavinicuk07
Предмет: Українська мова, автор: Аноним
Предмет: Геометрия, автор: fiksikanastasia25