Дано 100 вещественных чисел, которые вводятся по одному

Дано n вещественных чисел, которые вводятся с клавиатуры. Вычислить сумму чисел, кратных 3
Помогите, пожалуйста. Дано n вещественных чисел, которые вводятся с клавиатуры. Вычислить сумму чисел, кратных 3.

Дано число n и вещественные a1.an, которые вводятся по одному
Дано натурально число n и вещественные чисда a1,a1,...,an , которые вводятся по одному. Получить a1*a2+a2*a3+...+an-1*an (n>1) ...

Дано 100 вещественных чисел которые вводятся по одному вычислите разницу
const N = 100; var a: array of integer; i: byte; min, max: integer; begin randomize; for i:=1 to N do...

Пусть дано 100 целых чисел, которые вводятся по одному. Получить сумму тех, которые:
sum2 в итоге явно должно получаться меньше 0, а оно равно нулю - непорядок. Подскажите, в чём проблема. type g=-75..75; d=-1000..1000;...

Дано 100 целых чисел, которые вводятся по одному. Получите сумму тех из них, которые кратны 5
Пусть дано 100 целых чисел, которые вводятся по одному. Получите сумму тех из них, которые кратны 5. в Байсике...

Пусть дано 100 целых чисел, которые вводятся по одному. Найти сумму чисел
...которые меньше по абсолютному значению квадрата порядкового номера вводимого числа.

Пусть дано 100 целых чисел, которые вводятся по одному. Получите сумму кратных 5
Пусть дано 100 целых чисел, которые вводятся по одному. Получите сумму тех из них, которые: А) кратны 5 Б) нечётны и отрицательны

Пусть дано n вещественных чисел, которые вводятся по одному. Найти сумму чисел, меньших по абсолютному значению квадрата порядкового номера вводим
Пусть дано n вещественных чисел, которые вводятся по одному. Найти сумму чисел, меньших по абсолютному значению квадрата порядкового номера...