4*2^x Кб = 16*2^10 Кб
4*2^x = 4*2^2*2^10
4*2^x=4*2^12
x=12
Program n1;
var a: array[1..10] of integer;
i: integer;
begin
for i:=1 to 10 do readln(a[i]);
for i:=1 to 10 do if a[i] mod 2=0 then write(a[i],' ');
end.
Немного непонятно, о каком именно коэффициенте сопротивления идёт речь (если задача действительно по информатике, а не по физике). По размерности подходит такое выражение для силы сопротивления (я буду считать, что дано именно оно, плотность воздуха ρ примем равной 1,25 кг/м3):
Уравнение движения парашютиста:
Для решения задачи создадим таблицу, в которой будут столбцы: время, координата, скорость и ускорение. Со временем проще всего, это последовательные шаги, начиная с 0 с с некоторым шагом t. Затем вычисляем по формуле ускорение, скорость (изменение скорости есть a * t), и координату (изменение координаты есть v * t). Когда парашютист достигнет земли, его координата не должна меняться, это можно сделать при помощи функции ЕСЛИ.
Получившийся файл Excel и графики приложены к ответу.
1)BC(16) = 188(10)
2)
3)
21,1(10)
25,1(8)
15,1(16)
4)
Shift,F1 - Основные клавиши
1 - Вспомогательные клавиши
End - Командные клавиши