Var i, j:longint; flag, n:byte; begin ​n:=1; ​for i:= 2943444 to 2943529 do begin ​​flag:=0; ​​for j:= 2 to i div 2 do ​​​if i mod j =0 then begin ​​​​flag:= 1; ​​​​break; ​​​end; ​​if flag=0 then begin ​​​writeln(n, ' ', i); ​​​inc(n); ​​end; ​end; end. Переведите програму с паскаля на питон

1 это раздел компьютерной графики посвящённый методам создания изображений или видео путём моделирования объёмных объектов в трёхмерном пространстве

2:2D еще называется "плоским изображением". ЗD, она же трехмерная графика — раздел компьютерной графики, объектом которого является изображение, формируемое в трех измерениях, к параметрам которого добавлена глубина, таким образом, 3D — это объемное изображение.

3TINKERCAD

3DTIN

3D SLASH

123D CATCH

SCULPTRIS

SKETCHUP

BLENDER 3D

FREECAD

OPENSCAD

4программа для моделирования относительно простых трёхмерных объектов — строений, мебели, интерьера. Однако существуют и гораздо более серьёзные проекты на её базе. Так например в SketchUp была создана 3D модель города

Rem BASIC-256
cls
errors = 0
print "Введите текст > ";

rem Пользователь вводит текст
input a$

rem Перебираем все буквы с начала и до предпоследней
for i=1 to length(a$)-1

rem Если встречаем букву Ч или Щ
if mid(a$, i, 1) = "ч" or mid(a$, i, 1) = "щ" then

rem Тогда проверяем следующую за ней букву.
rem Если это буква я, тогда подсчитываем очередную ошибку
if mid(a$, i + 1, 1) = "я" then errors = errors + 1
end if

rem Переходим к следующей букве
next i

rem Вывод результата
print "Количество ошибок в тексте ";
print errors

rem Конец программы
end