Byte, Short, Integer, Long, Single, Double
Если я правильно посчитал, в предложении 44 символа, unicode имеет вес символа 2 байта, общий объем строки - 44*2=88 байт
Var x,y:real;
begin
writeln('Введите координаты точки');
readln(x,y);
if (x>=0)and(y>=0)and(y<=(-1)*x+6)and(y>=(-2)*x+4)then writeln('True')
else writeln('False');
<span>end.</span>
#!/usr/bin/python
# -*- coding: utf-8 -*-
print u"введите число"
a = str(input())
for i in a:<span>
</span><span> if i+i in a:</span><span>
print i+i, u"содержит"</span>
Var
n,k:integer;
Begin
Write('Введите n и k: ');
Readln(n,k);
if n = k then write(n) else
if n>k then write('N - max') else write('K - max');
End.