⇢ Вопросы и ответы ⇢ Программирование ⇢ Другие языки и технологии

Андрей Ющуков

Даны целое n и действительный а1, а2,...аn. найти члены последовательности, принадлежащие отрезав [1;2]

..аn. найти члены последовательности, принадлежащие отрезав [1;2]. Написать программу в паскале без массивов

Анатолий Сесин

K := 0;
for i := 1 to N do begin Write('a[', i, '] = '); ReadLn(A); if (A >= 1) And (A <= 2) then Inc(K); end;
WriteLn(K);

Похожие вопросы

Помогите пожалуйста с задачей по Паскалю. Из последовательности чисел А1, А2, ..А30 выбрать целые четные

Задачка по С++ решить нужно, помогите. Дана последовательность из n целых чисел. Получить: А1+А3+А5+А7+...

дано м=а1+а2+а3+а4,найти макс. =а1*а2*а3*а4.нужно написать на с++ срочно помогите экзамен!!!

Получить массив а1,а2....аn(n<=20) по правили ак=sin(1/(k!+2). Упорядочить его по возрастанию элементов и выдать на

Помогите оформить через подпрограмму. Даны целые числа а1,а2,...an и b1,b2,...bn.Преобразовать последовательность b

Дана последовательность действительных чисел а1 а2...аn. Найти количество элементов до первого минимума.

помогите пжст реш: Даны действит. чис а1 а2 аn n<=30 пол-ть (1+r)/(1+s), где r-сум членов посл-ти <=1 S- сумма членов>1

помогите пожалуйста решить и доказать задачу. Дан одномерный массив А (N). Поменять местами А1 и Аn, А2 и Аn-1 и т. д.

Дана числовая последовательность (а1=82; а2=7,9; а3=7,6;...) Найти сумму всех положительных членов

дано массив с А с 14 элементов. Напечатать следующую последовательность (а1+а14, а2+а13...а7+а8)