Дано n чисел....

Тема в разделе "Информатика", создана пользователем Kosiak, 14 мар 2010.

  1. Kosiak

    Kosiak New Member

    Дано n чисел. Найти сумму чисел, больших заданных чисел. (массив)
     
    Kosiak, 14 мар 2010
    #1
  2. fR0styk

    fR0styk New Member

    for i=1 to n
    if a(i)>0 then sum=sum+a(i)
    if a(i)<0 then k=k+1
    next
    msgbox sum
    msgbox k
     
    fR0styk, 14 мар 2010
    #2

Поделиться этой страницей

Наша группа