wertyy W wertyy Регистрация 31 Окт 2013 Сообщения 94 Репутация 0 Спасибо 0 Монет 0 27 Июн 2016 #1 Составить программу на языке Паскаль . Ввести с клавиатуры массив А из 13 целых чисел Вывести на экран количество отрицательных элементов массива. Если таких элементов нет, то вывести надпись "отрицательных элементов нет"
Составить программу на языке Паскаль . Ввести с клавиатуры массив А из 13 целых чисел Вывести на экран количество отрицательных элементов массива. Если таких элементов нет, то вывести надпись "отрицательных элементов нет"
tyson T tyson Регистрация 30 Янв 2013 Сообщения 88 Репутация 1 Спасибо 1 Монет 0 27 Июн 2016 #2 count:=0; for i:=1 to 13 do if mass < 0 then inc(count); Позитивный голос 0