//PascalABC.Net v3.1
var n:integer;
begin
readln(n);
if n mod 2 = 0 then n:=n*4 else n:=n+1;
writeln(n);
end.
В чем же дело, идем в Паскаль, набираем программу, запускаем, сотрим на результат. Программа выдает значение первого элемента массива A[1]:=(mas[9]-mas[1])*mas[5];
65536=2^16 16бит на 1 пиксель 70*70=4900 4900*16=78400
Мышь, тачпад и трекбол выполняют функцию комп.мыши, получается, что лишнее - клавиатура
M = E/gh - формула для массы тела