создать массив натуральных четных чисел длины N, и вывести сумму элементов. можно блок схему.
10-11 класс
|
const n=20;
var a:array[1..n] of integer;
i,s:integer;
begin
s:=0;
for i:=1 to n do begin
readln(a[i]);
if a[i] mod 2<>0 then begin
writeln('вы ввели нечетное число. введите заного');
readln(a[i]); end;
s:=s+a[i];
end;
writeln(s);
end.
Другие вопросы из категории
программу, которая бы по введенному номеру времени года (1 - зима, 2 - весна, 3
- лето, 4 - осень) выдавала соответствующие этому времени года месяцы,
количество дней в каждом из месяцев.
записываются в файл, сжатие данных не производится. Определите размер полученного файла в мегабайтах?
Читайте также
об этом факте
Можно на языке Паскаля
каждый его элемент был равен утроенному значению его порядкового номера (индекса). 3. Ввести массив с клавиатуры, найти и вывести сумму элементов массива. 4. Ввести массив с клавиатуры, подсчитать, сколько в нем положительных элементов, а сколько отрицательных. 5. В одномерном массиве подсчитать, сколько отрицательных элементов находится на четных местах и сколько положительных на нечетных. 6. Элементы массива вводятся с клавиатуры, заменить в нем все отрицательные элементы их квадратами, а положительные кубами. Вывести на экран исходный и новый массив. 7. Ввести массив с клавиатуры, найти и вывести на экран максимальный и минимальный элементы. 8. Написать программу, которая определяет есть ли в массиве элемент введенный пользователем, подсчитывает их количество и выводит номер первого найденного элемента.
указать тип алгоритмов:Найти сумму первых десяти натуральных четных чисел.
Вывести на экран массив в виде таблицы и сумму элементов массива.