Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.03.2017, 09:45   #1
sazonenko-irina
Новичок
Джуниор
 
Регистрация: 15.03.2017
Сообщений: 1
По умолчанию Вычисление значения функции U

Уважаемые мастера, помогите решить задачу.
7575.jpg
У меня получаются только два пункта, и то, по отдельности, вообщем ерунда.
var
x, y, u: integer;
begin
write ('Введите x y');
readln (x,y);
if (x+y<=0) then
u:=(x*x)*y;
write (u);

var x, y, u: real;
begin
write (' Введите x y');
readln (x,y);
if (x+y>=15) then
u:=sin(x*y);
write (u);
end.
sazonenko-irina вне форума Ответить с цитированием
Старый 15.03.2017, 11:46   #2
newerow1989
Я самый любопытный
Участник клуба
 
Аватар для newerow1989
 
Регистрация: 24.07.2012
Сообщений: 1,949
По умолчанию

Код:
uses Math;

var
   x, y: integer;
   u:real;
begin
   write ('Введите x y ');
   readln (x,y);
   if (x+y<=0) then
      u:=(x*x)*y else
   If (0<x+y) and (x+y<15) then
      u:=Power(x,-y)*Exp(1) else
      u:=sin(Abs(x*y));
   Writeln(u:8:5);
   Readln;
end.
С запрограммированным приветом, Неверов Евгений!
Сайт: http://newerow1989.ru
[Паскаль] [Delphi]
newerow1989 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
вычисление значения функции shbn Паскаль, Turbo Pascal, PascalABC.NET 1 13.10.2012 12:54
вычисление значения функции и переменных, вычисление площади треугольника, определение расстояния между точками на турбо паскале _4Alex4_ Помощь студентам 2 14.12.2011 01:43
C# Вычисление значения функции PROkaZZZniK C# (си шарп) 0 21.10.2011 16:05
Вычисление значения функции evklid Помощь студентам 6 10.11.2010 22:30