Для определения, является ли число положительным достаточно сравнить его с нолём. Число больше ноля - положительное, меньше ноля - отрицательное. Сам по себе ноль не является ни положительным, ни отрицательным числом, но т.к. на ход решения это не влияет, этой деталью можно пренебречь. Алгоритм:
1. Начало
2. Ввести числа а и b
3. Если число a > 0 то запомнить a = a * 10
иначе запомнить a = a * a
4. Если число b > 0 то запомнить b = b * 10
иначе запомнить b = b * b
5. Вывести числа a и b
6. Конец
program one;
type TIntMassiv = array of real;
var a,b,c,x,y: TIntMassiv; n,i:integer;
begin
writeln('Введите длину массивов(n)');
readln(n);
setLength(a,n); // Создаем динамические массивы длины n
setLength(b,n);
setLength(c,n);
setLength(x,n);
setLength(y,n);
for i := 0 to n-1 do
begin
writeln('Введите ',i+1, ' массива a');
readln(a[i]);
writeln('Введите ',i+1, ' массива b');
readln(b[i]);
writeln('Введите ',i+1, ' массива c');
readln(c[i]);
end;
for i := 0 to n-1 do
begin
x[i] := MIN(a[i],b[i]) / 2;
y[i] := MIN(a[i],c[i]) / 2;
end;
for i := 0 to n-1 do
begin
writeln('x[',i,']=',x[i]);
writeln('y[',i,']=',y[i]);
end;
a := nil; //Освобождаем память
c := nil;
b := nil;
x := nil;
y := nil;
end.
#include <iostream>
using namespace std;
int main()
{
double x, y;
cout << "x = ", cin >> x;
cout << "y = ", cin >> y;
if ((x>=-2)&&(x<=2)&&(y>=0)&&(y<=4)||(x>=-4)&&(x<=5)&&(y>=-3)&&(y<0))
cout << "true";
else cout << "false";
return 0;
}
Пример:
<span>x = 3
y = -1
true</span>
Январь-7,8,14,15,21,22,28,29 красные все остальные зелёные
Февраль-4,5,11,12,18,19,25,26 красные все остальные зелёные
Март-4,5,11,12,18,19,25,26 красные все остальные зелёные
Апрель-1, 2, 8,9,15,16,22,23,29,30 красные все остальные зелёные
Май-6,7,13,14,20,21,27,28 красные все остальные зелёные
Июнь-3,4 10,11,17,18,24,25 красные все остальные зелёные
Июль-1,2,8,9,15,16,22,29 красные все остальные зелёные
Август-5,6,12,1319,20,26,27 красные все остальные зелёные
Сентябрь-2,3,9,10,16,17,23,24,30 красные все остальные зелёные
(дальше не вижу)
const
g = 10;
var
h,t:real;
begin
write('Write height in meters: ');
readln(h);
t:=sqrt(2*h/g);
writeln('Fall Time: ',t:0:1, ' seconds');
end.