5 клеток нудно чтобы он добрался до сокровищ и не разбился по пути
Определите, какая из двух точек A и B находится ближе к началу координат.
Если точки находятся на одинаковом расстоянии, вывести 'Точки A и B находятся на одинаковом расстоянии от начала координат'.
Ответ:
ИЛИ ложное, когда оба ложные, значит х≤50 и х-четное, след-но наименьшее из 2,4,...48,50 , =2 -ответ
{Составте программу табулирования функции y=1/x^2 с шагом 0,5 и интервал -5<x<7}
const
max_x = 7;
min_x = -5;
d_x = 0.5;
var
x, y: real;
begin
x := min_x;
while(x < max_x) do
begin
if(x <> 0) then
y := 1 / (x * x)
else y := 0;
writeln('x=', x:2:1, ' y=', y:2:5);
x := x + d_x;
end;
end.