В 1 мб=1024 кб
следовательно 270*1024=276480
//PascalABC.Net 3.1.0.1200
begin
var a := ArrRandomInteger(10, 1, 10);
writeln(A[Random(A.Length)]);
end.
а) Серёже надо приходить в 8 часов.
б) нарицательные числа
в) 0 не делиться на 5
<span>n = int(input('n ='))
m = int(input('m ='))
if n%2<span>:
</span> for i in range(n,m+1,2)<span>:
</span> print(i,'**2 = ',i**2)
else<span>:
</span> for i in range(n+1, m+1, 2)<span>:
</span> print(i, '**2 = ', i ** 2)</span>
На счет ввода с клавиатуры, уточните в комментариях, поскольку массив не может сформироваться если же это не константа. Вот программа