Var
A: array [1..10] of integer;
min,i:integer;
begin
i:=1
while i<11 do
begin
readln(A[i]);
i:=i+1;
end;
i:=1;
n:=A[1];
repeat
if min>A[i] then
min:=A[i]
i:=i+1;
until I=10;
A[10]:=min;
end
' Basic
' For ... Next
dim yi as integer
dim n as integer
dim z as double
dim sum as double
dim zi as double
sum = 0
print "Введите n: "
input n
for yi = 1 to n
if ((yi > 15) or (yi < 0)) then
z = 2
else
z = yi
end if
zi = (sqr(z)-z)*(sqr(z)-z)
sum = sum + zi
next
print "Сумма = ", sum;
'-----------------------------------------------------------
' While Wend
dim yi as integer
dim n as integer
dim z as double
dim sum as double
dim zi as double
sum = 0
yi = -1
print "Введите n: "
input n
while (yi < n)
if ((yi > 15) or (yi < 0)) then
z = 2
else
z = yi
end if
zi = (sqr(z)-z)*(sqr(z)-z)
sum = sum + zi
yi = yi + 1
wend
print "Сумма =", sum;
<h3>Алгоритм решения</h3>
Выводим через пробел все числа от b-1 до a+1. В цикле вывода можем считать количество таких чисел, а можем воспользоваться формулой (b-a = кол-во целых чисел от a до b-1 или от a+1 до b).
<h3>Код</h3>
#include <bits/stdc++.h>
using namespace std;
int main() {
int a, b;
cin >> a >> b;
for (int i = b-1; i > a; --i)
cout << i << " ";
cout << endl << (b-a-1) << endl;
return 0;
}
---------------------
Файл решения прикреплён.
Объем одного символа - <span>I = log2N = log2(16) = 4 бита
</span>К = 3*1024*8/4 = 6144 символов
Ответ. 6144 символов