Вывести все натуральные числа от 20 до 50 кратные 3 и не кратные 5 ( на паскале)

begin

  range(20, 50).where(t -> (t mod 3 = 0) and (t mod 5 < >

end.

1 байт/с = 23 бит/с = 8 бит/с; 1 кбит/с = 210 бит/с = 1024 бит/с; 1 мбит/с = 210 кбит/с = 1024 кбит/с; 1 гбит/с = 210 мбит/с = 1024 мбит/с.

2000 - k

16 бита - i

v=k*i=2000*16=32000 бита=4000 байтов