n = input ()
for i in xrange (2, n+1):
k = 0 for j in xrange (2, i):
if i % j == 0:
k + 1 if k == 0:
print (i)
<span>import math as m
a = int(input("a="))
b = int(input("b="))
c = int(input("c="))
p = (a+b+c)/<span>2
</span>S = m.sqrt( p*(p-a)*(p-b)*(p-c) )
print("Площа трикутника за трьома сторонами ->",S)</span>
Сравнить с 1Мбайтом не очень понятно.
2. 20480бит=2560байт=320Кбайт < 1Мб
3. 5Мбайт=5120 Кбайт=5242880байт=41943040бит>1Мбайт
4. 153600байт=150 Кбайт<1Мбайт
5. 6Кбайт=6144 байт=49152 бит<1Мбайт
Если длина ребра именно равна 2 (a=2), то решаем так:
begin
Writeln(2*2*2,' ', 2*2); //Первое число - объём куба, второе - площадь боковой поверхности
end.
А если нам следует ввести значение a, то решаем так:
var a:int64;
begin
read(a);
Writeln(a*a*a,' ', a*a); //Первое число - объём куба, второе - площадь боковой поверхности
end.
надеюсь разберетесь что тут к чему, этот кусок кода нужно вставить после строки for i := 1 to n do writeln(r[i]); {Найденный массив}, а после этого вывести измененный массив, сами допишите. Если что-то не понятно смотрите текстовый файл во вложении.