Линейные и развивающиеся структуры.

@hexorq · Регистрация: 20.12.2010

1.(линейное уравнение)
Написать программу, которая вычисляет периметр и площадь правильного 17-ти угольника, вписанного в окружность заданного радиуса.

2.(разветвляющеися структуры)
Даны действительные числа x, y. Определить, принадлежит ли точка с координатами x, y кругу с центром в начале координат и радиусом R.

Очень прошу, помогите... Если надо могу деньги дать просто очень срочно нужно.
Заранее благодарен!!!
Skype - sky816ark.

@sir_90115 · 20.12.2010, 17:31

2.

Pascal

uses wincrt;
var
  r,x,y,z :real;
begin
  clrscr;
  Write ('Vvedite x: ');
  readln (x);
  Write ('Vvedite y: ');
  readln (y);
  Write ('Vvedite R: ');
  readln (r);
  z:=-r;                       {отрицательные координаты радиуса}
  if (z<=x) and (x<=r)and (z<=y) and (y<=r) then
   write ('Tochka prinadlejit krugu')
  else write ('Tochka ne prinadlejit krugu');
  end.

а по первому формулу надо...

@hexorq · 20.12.2010, 18:15 **[ТС]**

Сообщение от sir_90115

2.

Pascal

uses wincrt;
var
  r,x,y,z :real;
begin
  clrscr;
  Write ('Vvedite x: ');
  readln (x);
  Write ('Vvedite y: ');
  readln (y);
  Write ('Vvedite R: ');
  readln (r);
  z:=-r;                       {отрицательные координаты радиуса}
  if (z<=x) and (x<=r)and (z<=y) and (y<=r) then
   write ('Tochka prinadlejit krugu')
  else write ('Tochka ne prinadlejit krugu');
  end.

а по первому формулу надо...

Спс за решение 2ой задачи!
А по первой нету никаких формул в задании, написал как есть...

Добавлено через 11 минут
В решении 2 задачи пишет ошибку "Identifier expected" во 2 строке...

@sir_90115 · 20.12.2010, 18:31

Сообщение от hexorq

В решении 2 задачи пишет ошибку "Identifier expected" во 2 строке...

у меня нормально работает... это что то у тебя....

@hexorq 0 / 0 / 0 Регистрация: 20.12.2010 Сообщений: 6
		1
	Линейные и развивающиеся структуры. 20.12.2010, 16:48. Показов 590. Ответов 3 Метки нет (Все метки) 1.(линейное уравнение) Написать программу, которая вычисляет периметр и площадь правильного 17-ти угольника, вписанного в окружность заданного радиуса. 2.(разветвляющеися структуры) Даны действительные числа x, y. Определить, принадлежит ли точка с координатами x, y кругу с центром в начале координат и радиусом R. Очень прошу, помогите... Если надо могу деньги дать просто очень срочно нужно. Заранее благодарен!!! Skype - sky816ark. 0

@sir_90115 8 / 8 / 2 Регистрация: 08.11.2009 Сообщений: 78
	20.12.2010, 18:31	4
	Сообщение от hexorq В решении 2 задачи пишет ошибку "Identifier expected" во 2 строке... у меня нормально работает... это что то у тебя.... 0

Опции темы