:вывести на экран числа оканчивающаяся на 3 в промежутке от n до 150. сделать только блок схему. по и while.98

Сколько раз писали " " – никогда не давали..
Что for, что while – блок-схема одна, только код разный.

1.
var i,n:integer;
begin
readln (n);
for i:=n to 150 do
if i mod 10 = 3 then write (i,'   ')
end.

2.
var n:integer;
begin
readln (n);
while n < 150 do
begin
if n mod 10 = 3 then write (n,'   ');
n:=n+1
end
end.

Задание 1: СМИ, реклама, дизайн, веб-дизайн и т. д.

Задание 1.2: Компьютерная анимация — вид мультипликации, создаваемый при компьютера. В отличие от более общего понятия «графика CGI», относящегося как к неподвижным, так и к движущимся изображениям, компьютерная анимация подразумевает только движущиеся. На сегодня получила широкое применение как в области развлечений, так и в производственной, научной и деловой сферах. Являясь производной от компьютерной графики, анимация наследует те же создания изображений:

Задание 2: Дисплейный процессор — вторая составляющая видеоадаптера.

Задание 2.2: Дисплейный процессор читает содержимое видеопамяти и в соответствии с ним управляет работой дисплея.

Задание 3: Их несколько, Первое это сканер, второе это графический планшет. Третье это фотоаппарат, Четвертое это Web камера

from math import sqrt, acos, pi

A1,B1,C1=map(float,input('A1 B1 C1 через пробел: ').split(' '))

A2,B2,C2=map(float,input('A2 B2 C2 через пробел: ').split(' '))

if A1*A2+B1*B2==0: print('прямые перпендикулярны')

else:

   ang=(A1*A2+B1*B2)/(sqrt(A1*A1+B1*B1)*sqrt(A2*A2+B2*B2))

   ang=round(acos(ang)*180/pi)

   print('угол между прямыми: ',ang,' град.')

>>>  

A1 B1 C1 через пробел: -1 1 -3

A2 B2 C2 через пробел: 1 1 -1

прямые перпендикулярны

>>>  

A1 B1 C1 через пробел: 1.5 -3.8 5

A2 B2 C2 через пробел: 2.6 3.4 2

угол между прямыми:  121  град.