8 ж 9б 10 в 11 г 12 а 13 б 14 а 15 а 16а
82741653
тут срачь из-за недостатка символов в ответе
program Cikle;
uses crt;
var a,b,i,k:integer;
Begin
clrscr;
write('Введите А: '); readln(a);
<span>write('Введите B: '); readln(b);
</span>if a>b then begin i:=a; a:=b; b:=i end;
{_______________________________________}
{1 способ реализации - цикл for}
k:=0;
for i:=a to и do k:=k+i;
{_______________________________________}
{2 способ реализации - цикл с предусловием while}
k:=0;
while a<=b do begin
k:=k+a;
a:=a+1 end;
{_______________________________________}
{3 способ - цикл с постусловием repeat}
k:=0;
repeat
k:=k+a;
a:=a+1;
until a>b;
{_______________________________________}
{Окончание программы одинаковое для всех способов}
Writeln('Сумма элементов в интервале [A;B] равна ', k)
readln
End.
1) Сместиться на (−5, −2)
2) Сместиться на (−3, −5)
3) Сместиться на (−5, −4)
<span>4) Сместиться на (−5, −5)
(-5-3-5-5;-2-5-4-5)=(-18;-16)
значит, чтобы вернуться в исходную точку нужно выполнить команду :
сместиться на(18;16)</span>
смотри : Берешь 5 литров ( заливаешь в большой баллон)
переливаешь в маленький становиться (дальше буду использовать операции долить, вылить перелить)
1. 3 / 2 (М/Б)
2. 0/2
3. 2/0
4. 2/5
5. 3/4
6. 0/4
7. 3/1 и вот в большом баллоне ровно 1 литр воды