2кбайта = 2048 байт => 1символов = 1 байт
1 байт = 8 бит
2 ^ 8 = 256
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
program Задача;
begin
var x,y:integer;
Read(x,y);
if (x>0) and (y>0) then
Writeln('Точка принадлежит 1-ой четверти КП')
else
Writeln('Точка не принадлежит 1-ой четверти КП')
end.
Сверху в меню: Вставка -> Фигуры -> Линия(вверху должна быть). И делаете себе линию какую хотите :)
Во вложеном файле приведено решение на языке С++.
А вот на Pascal:
program Znanija;
var a, b, c, n: integer;
begin
read(a);
read(b);
read(c);
n:=(c-a) div b;
writeln();
writeln(n);
end.