2014 dxdy logo

Научный форум dxdy

Математика, Физика, Computer Science, Machine Learning, LaTeX, Механика и Техника, Химия,
Биология и Медицина, Экономика и Финансовая Математика, Гуманитарные науки




 
 Работа с Pascal, помощь школьнику
Сообщение18.09.2014, 01:02 
Перешел в новую школу, а там уклон на икт, не все догоняю...
С первой частью разобрался, а вот что делать с U и как его считать я без понятия.
_______________
Даны три целых числа A, B, C (1,2,3). Определить значения переменных X, Y, Z. Вывести их на экран дисплея. Пусть D1 и D2 - заштрихованные части плоскости (см. рисунок ниже), и пусть U определяется как функция X и Y.
Вывести U на экран дисплея.

Изображение
______________________________
Пока встал на этом:
Изображение

Заранее благодарю Вас за любую помощь.

 
 
 
 Re: Работа с Pascal, помощь школьнику
Сообщение18.09.2014, 01:24 
Аватара пользователя
Я вам называю пары $(X,Y)$:
1) (1,0)
2) (1,1)
3) (0.7, 0.7)
4) (-1, -1.1)
5) (0, -3)
6) (-0.9, -0.9)
и так далее

Можете для каждой пары определить вхождение в $D_1$ или $D_2$ или ни в одно из них? Каким образом это делать, что проверить нужно?

 
 
 
 Re: Работа с Pascal, помощь школьнику
Сообщение18.09.2014, 01:24 
А проблема-то в чем? Что именно не получается?
В код не вчитывался буквально, но в глаза явно бросается ошибка в третьей строке снизу - после else идет три оператора, которые надо включить внутрь операторных скобок:
Код:
else
Begin
  x:= a;
  y:= b;
  z:= c;
End;

Если оставить как у вас, то в ветви else будет выполняться только первое присвоение, остальные будут срабатывать всегда независимо от условий.

И зачем вы делаете такие конские отступы? Читать неудобно же.

 
 
 
 Re: Работа с Pascal, помощь школьнику
Сообщение18.09.2014, 18:32 
Всем спасибо, замутил таки...

Закончил программу этим кодом:

.....else begin x := a; y := b; z := c;
if (x*x+y*y <= 1) and not ((x>0) and (y < 0)) then u := cos(x*y)
else if (x < 0) and (y < 0) and (y <= -x-2) then u := sin(x*y)
else u := z+5
end;
writeln......

Тему можно закрыть :-)

 
 
 
 Re: Работа с Pascal, помощь школьнику
Сообщение18.09.2014, 19:41 
Аватара пользователя
 !  Jarebeck, замечание за неиспользование тегов [syntаx]/[cоde] при включении в сообщение текста программы.

 
 
 [ Сообщений: 5 ] 


Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group