Бейсик Python
FOR n = 1 TO 100
A(n) = n - 10
NEXT n
FOR n = 1 TO 100
B(n) = A(n)*n;
NEXT n
for n in range(1, 101):
A[n] = n - 10
for n in range(1, 101):
B[n] = A[n]*n
Паскаль Алгоритмический язык
for n : = 1 to 100
do A[n] : = n - 10;
for n : = 1 to 100 do begin
B[n]:= A[n]*n;
end;
n от 1 до 100
A[n] : = n - 10
n от 1 до 100
B[n]:=A[n]*n
for (n = 1; n <= 100; n++) {
A[n] = n - 10;
for (n = 1; n <= 100; n++) {
B[n] = A[n]*n;
Дано:
к=260
N=64 => i=6
Решение
I=k*i
I=260*6=1560 бит=195 байт
Знайти цукерки, пакет покласти на стіл, відкрити пакет з цукерками, взяти 1 цукерку , відкрити її , з'їсти цукерку.
1) 2048 * 1536 = 3145728 точек в изображении
2) 3145728 * 3 байта = 9437184 байт - размер файла
9437184 байт / 1024 = 9216 Килобайт / 1024 = 9 Мегабайт
Ответ: 9 Мб размер этого графического файла
//PascalABC.NET
//Версия 3.4.2
begin
range(1,ReadInteger('n=')).Where(x->x.IsEven).Println;
end.