Вмассиве b1, найти количество чисел равных 3,5

kakhaeva02 kakhaeva02    3   07.08.2019 12:10    0

Ответы
ПотнаяБабка2000 ПотнаяБабка2000  04.10.2020 02:58
Dim b(45)
for i=1 to 45
  print "b(";i;")= ";
  input b(i)
next i
for i=1 to 45
  if b(i)=3.5 then
    s=s+1
  end if
next i
print "kolichestvo: "; s
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика