Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

Заполнить массив из 9 элементов случайными числами в интервале 10;150 и найти сумму элементов массива у которых вторая с конца цифра нечетная

10-11 класс

1AliceInWonderland1 15 февр. 2014 г., 19:57:40 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
жпм
15 февр. 2014 г., 22:13:06 (10 лет назад)

var
a:array [1..9] of integer;
i,k,b:integer;
begin
randomize;
writeln('Массив:');
for i:=1 to 9 do
begin
a[i]:=random(141)+10;
write(a[i],' ');
end;
writeln;
for i:=1 to 9 do
begin
if a[i]<=99 then
if ((a[i] div 10) mod 2)<>0 then k:=k+a[i];
if a[i]>99 then
begin
b:=a[i] div 10;
if (b mod 2)<>0 then k:=k+a[i];
end;
end;
writeln('Сумма элементов у которых вторая с конца цифра нечетная: ',k);
end.

Ответить

Другие вопросы из категории

Читайте также

Помогите пожааалуйста,вообще нереально сделать(задачи зависят друг от друга) 1.заполнить массив из 100 элементов случайными числами.вывести на

экран с 20 по 50 в строку через пробел

2.для первыз десяти элементов найти среднее арифмитическое

3.вывести на экран только четные элементы с 1 по 10 элементы массива

4.найти сумму нечетныз значений с 20 по 50 элемент

5.найти количество элементов кратныз заданному числу,введёного с клавиатуры среди всез элементок линейного массива

Пожалуйста помогите составить программу.Заполнить массив из 500 элементов случайными числами в интервале [ 0 .. 100 ] . Отсортировать его по

возрастанию двумя способами – методом «пузырька» и методом «быстрой сортировки» .

Помогите, пожалуйста!

заполнить массив из 9 элементов случайными числами в интервале в интервале [10,150] и найти min элемент массива, у которых вторая с конца цифра- нечетная



Вы находитесь на странице вопроса "Заполнить массив из 9 элементов случайными числами в интервале 10;150 и найти сумму элементов массива у которых вторая с конца цифра нечетная", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.