writeln('определение принадлежности точки отрезку');
writeln('введите a');
readln(a);
writeln('введите b');
readln(b);
writeln('введите x');
readln(x);
if ((x>=a) and (x<=b)) then writeln('точка принадлежит отрезку')
else writeln('точка не принадлежит отрезку');
end.
Объяснение:
нужна была тчк с запятой после действия в else, в этом была ошибка. (еще ни разу не видела, чтобы переменные в паскале вводили через запятую, так что не рискуй.)
using System;
namespace ConsoleApp1
{
class Program
{
static void Main(string[] args)
{
double a, b, c;
Console.WriteLine("Введите a:");
a = Convert.ToDouble(Console.ReadLine());
Console.WriteLine("Введите b:");
b = Convert.ToDouble(Console.ReadLine());
Console.WriteLine("Введите c:");
c = Convert.ToDouble(Console.ReadLine());
Console.Write("Результат: {0} , {1}, {2}", (a > 0) ? a * a : a * a * a * a,
(b > 0) ? b * b : b * b * b * b, (c > 0) ? c * c : c * c * c * c);
}
}
}
program n_9;
var x,a,b:real;
begin
writeln('определение принадлежности точки отрезку');
writeln('введите a');
readln(a);
writeln('введите b');
readln(b);
writeln('введите x');
readln(x);
if ((x>=a) and (x<=b)) then writeln('точка принадлежит отрезку')
else writeln('точка не принадлежит отрезку');
end.
Объяснение:
нужна была тчк с запятой после действия в else, в этом была ошибка. (еще ни разу не видела, чтобы переменные в паскале вводили через запятую, так что не рискуй.)
а это советы на будущее:
нормальные скобки в условиях.