так, ну смотри.
у тебя изначально даны двепеременные
s,котороеравно1
k,котороеравно0
программа заходит в цикл, в котором пока kбудетменьше13
будут выполняться данные вычисления
получается, что каждый раз, числу sиkбудут присваиваться новые значения
щас распишу
- s=1+2*0 (s=1)
- k=0+4 (k=4)
- s=1+2*4 (s=9)
- k=4+4 (k=8)
- s=9+2*8 (s=25)
- k=8+4 (k=12)
- s=25+2*12 (s=49)
- k=12+4 (k=16)
циклпрервался!т.к.16меньше13
теперь мы выводим сумму s и k
49+16=65
Var ma:array[1..4,1..5] of integer;
ar:array[1..20] of integer;
k,i,j:integer;
begin;
randomize;
writeln('Matrix:');
for i:=1 to 4 do
begin;
writeln;
for j:=1 to 5 do
begin;
ma[i,j]:=random(-10,10);
if ma[i,j]<0 then
begin;
inc(k);
ar[k]:=ma[i,j];
end;
write(ma[i,j]:4);
end;
end;
writeln;
writeln('Final array:');
for i:=1 to k do
write(ar[i]:4);
<span>end.</span>
Смотря какой размер открываемой страницы, чаще всего это от 1 до 7 Мб
703 = 512 + 192 - 1
512 = 8³
192 = 3·64 = 3·8²
1 = 8⁰
703 = 8³ + 3·8² - 8⁰
0 0
8 0
5 3
5 0
2 3
2 0
0 2
8 2
7 3
7 0
4 3
Первая цифра-кувшин 8л,вторая цифра кувшин 3 л. Набираем кувшин 8 л и переливаем из него жидкость в кувшин 3л.Потом из 3л выливаем жидкость. Повторяем пока не получиться 4л.