Условие задачи
Составьте на языке программирования Паскаль программу для обработки массива задайте путем ввода с клавиатуры. Входные данные придумайте самостоятельно. Вычислите сумму элементов массива не равных нулю, больших b и меньше a. Напечатайте номера элементов, которые удовлетворяют поставленному условию. Значения переменных a и b задайте самостоятельно.
Ответ
programЗадание2;
varC:array[1..15] of real;
a,b,s:real; i:integer;
begin
writeln('Введите массив C'); //Вывод надписи на экран
fori:=1 to15 do//Счетный цикл от 1 до 15
read(C[i]); //Ввод элемента массива C[i]
writeln; //Перевод курсора на следующ...
Потяни
