Нужна помощь по Free Pascal или Borland Pascal - Visavi.net
https://visavi.net/
RSS - Visavi.nethttps://visavi.net/assets/img/images/logo_small.pngRSS - Visavi.net
https://visavi.net/
admin@visavi.net (admin)admin@visavi.net (admin)Sun, 06 Apr 2025 09:15:41 +0300Старый добрый паскаль ... бррр..
https://visavi.net/topics/29169/494590
Нужна помощь по Free Pascal или Borland Pascal ДмитрийSat, 04 Feb 2012 16:10:04 +0400Сообщенияhttps://visavi.net/topics/29169/494590<pre class="prettyprint">var x,y:int64;
begin
readln(x,y);
if x>0 then
begin
if y>0 then
writeln(1)
else
writeln(4);
end
else
begin
if y>0 then
writeln(2)
else
writeln(3);
end;
if(x=0)or(y=0)then
writeln(0);
end.</pre>
https://visavi.net/topics/29169/494568
Нужна помощь по Free Pascal или Borland Pascal Apollon76Sat, 04 Feb 2012 15:10:39 +0400Сообщенияhttps://visavi.net/topics/29169/494568Мнеб на Паскале
https://visavi.net/topics/29169/494426
Нужна помощь по Free Pascal или Borland Pascal 7777seny7777Sat, 04 Feb 2012 10:33:30 +0400Сообщенияhttps://visavi.net/topics/29169/494426<pre class="prettyprint">
var y = 10, x = 10; (y>0)?((x>0)?1:2):( (x>0)?4:3);
</pre>
смысл понятен <img src="https://visavi.net/uploads/stickers/smile.gif" alt="smile"> <br>
код на JavaScript
https://visavi.net/topics/29169/494425
Нужна помощь по Free Pascal или Borland Pascal АлексейSat, 04 Feb 2012 10:26:44 +0400Сообщенияhttps://visavi.net/topics/29169/494425Задано точку з координатами х та у. Визначити, в якій координатній чверті вона розміщена. <br>
Формат вхідних даних<br>
<br>
З клавіатури вводяться цілі числа х та у, які розділені одним пробілом (-1000 < х, у < 1000). <br>
Формат вихідних даних<br>
<br>
На екран виводиться одне число – координатна чверть або 0, якщо визначити однозначно чверть не можна<br>
<br>
<em><span style="font-size:x-small">Добавлено через 01:16 сек.</span></em><br>
Кто поможет?<img src="https://visavi.net/uploads/stickers/smile.gif" alt="smile">
https://visavi.net/topics/29169/494424
Нужна помощь по Free Pascal или Borland Pascal 7777seny7777Sat, 04 Feb 2012 10:14:37 +0400Сообщенияhttps://visavi.net/topics/29169/494424