INPUT "a="; a
INPUT "b="; b
FOR i = a TO b
s = s + i
n = n + 1
NEXT i
PRINT "Сумма:"; s
PRINT "Количество:"; n<span>
</span>
<em>// PascalABC.NET 3.2, сборка 1345 от 24.11.2016</em>
<em>// Внимание! Если программа не работает, обновите её версию!</em>
function Len(ax,ay,bx,by:real):=sqrt(sqr(bx-ax)+sqr(by-ay));
var
x,y,L:array[1..4] of real;
begin
Writeln('Введите координаты четырех точек (парами х,y)');
for var i:=1 to 4 do Read(x[i],y[i]);
for var i:=1 to 3 do
L[i]:=Len(x[i],y[i],x[i+1],y[i+1]);
L[4]:=Len(x[4],y[4],x[1],y[1]);
var s:=0.0;
for var i:=1 to 4 do s+=L[i];
Writeln('P=',s)
end.
<u>Пример</u>
Введите координаты четырех точек (парами х,y)
-5 -4.7 -3.2 6.7 5.1 8 7.4 -6.13
P=46.7405707422041
Во вложениях приведено решение этой же задачи в онлайн-калькуляторе. Ответ совпадает.
Const n=20;
var a: array [1..n] of integer;
i,s,k,v,j: integer;
begin
for i:=1 to n do
readln (a[i]);
writeln (a);
for i:=1 to n do
if (a[i] div 100 = 0) and (a[i] div 10 <> 0) then
begin
k:=k+1;
if k=1 then s:=s+a[i];
if k=3 then s:=s+a[i]
end;
writeln (s);
for i:=1 to n do
begin
for j:=1 to n-1 do
if a[j]<a[j+1] then
begin
v:=a[j];
a[j]:=a[j+1];
a[j+1]:=v
end
end;
writeln (a)
end.
<span>Толстой Лев Николаевич (28 августа 1828 года, усадьба Ясная Поляна Тульской губернии - 7 ноября 1910 года, станция Астапово (ныне станция Лев Толстой) Рязано-Уральской ж. д.) - граф, русский писатель.
Родился в аристократической графской семье. Получил домашнее образование и воспитание. В 1844 году поступает в Казанский университет на факультет восточных языков, затем учится на юридическом факультете. В 1847, не окончив курс, уходит из университета и приезжает в Ясную Поляну, полученную им в собственность по разделу отцовского наследства. В 1851 осознав бесцельность своего существования и, глубоко презирая самого себя, отправился на Кавказ в действующую армию. Там он стал работать над своим первым романом "Детство. Отрочество. Юность". Через год, когда роман опубликовали, Толстой стал литературной знаменитостью. В 1862, 34 лет от роду, Толстой женился на Софье Берс, восемнадцатилетней девушке из дворянской семьи.В течение первых 10—12 лет после женитьбы он создает «Войну и мир» и «Анну Каренину». В 1879 начинает писать "Исповедь", где рассказывает о перевороте в своих взглядах, смысл которых он видел в разрыве с идеологией дворянского класса и переходе на сторону "простого трудового народа". В 1886 "Власть тьмы", в 1886 пьесу "Плоды просвещения", в 1899 году на свет выходит роман "Воскресенье", драма "Живой труп" 1900, повесть "Хаджи-Мурат" 1904. Осенью 1910 года, выполняя свое решение прожить последние годы соответственно своим взглядам, тайно покинул Ясную Поляну, отрекшись от «круга богатых и ученых». Заболев в пути, умер. Был похоронен в Ясной Поляне. надеюсь подойдёт
</span>
1110₂ + Х₂ = 111001₂
X₂ = 111001₂ - 1110₂
X₂ = 101011₂
Поскольку 4 = 2², достаточно заменить каждую пару двоичных цифр на одну четверичную. Замену ведем справа налево.
Х₄ = (10)(10)(11)₂ = 223₄