перевисти на С

15.03.2010, 18:41. **Показов** 484. **Ответов** 1

Author24 — интернет-сервис помощи студентам

Здраствуйте! помогите перевисти програму с паскаля!

Pascal

flag:=((sqr(-1.3)+sqr(0.4)>16 and (-1.3)>4 and(0.4)>4:
Flag:=((sqr(x)+sqr(y)>16 and(x<4)or(x>-4) and(y<4) or (y>-4)):
write(' tochka  z koordinatami x, y zashtri[obanii oblasti');
if flag the writeln('lejit') else write('ne nalejit');

зарание благадарю!!!!

Day · 15.03.2010, 19:42

flag:=((sqr(-1.3)+sqr(0.4)>16 and (-1.3)>4 and(0.4)>4:Flag:=((sqr(x)+sqr(y)>16 and(x<4)or(x>-4) and(y<4) or (y>-4)):write(' tochka z koordinatami x, y zashtri[obanii oblasti');if flag the writeln('lejit') else write('ne nalejit');

C

   flag = (-1.3)*(-1.3) + 0.4*0.4 >16 && -1.3 > 4 && 0.4 > 4;
   Flag = x*x+y*y>16 && (x<4 || x>-4) && y> -4;
   printf("[COLOR=#ff0000] tochka  z koordinatami x, y zashtri[obanii oblasti"[/COLOR][COLOR=#009900])[/COLOR];
   [B]if[/B] (flag) printf[COLOR=#009900]("[/COLOR][COLOR=#ff0000]lejit\n"[/COLOR][COLOR=#009900])[/COLOR] [B]else[/B] printf[COLOR=#009900]("[/COLOR][COLOR=#ff0000]ne nalejit"[/COLOR][COLOR=#009900])[/COLOR];

Возможно перепутаны скобки в формуле для Flag, Паскалевских приоритетов я не помню

	15.03.2010, 19:42