Статистика
Всего в нашей базе более 4 327 046 вопросов и 6 446 035 ответов!

Дан массив из 25 элементов, заполненный случайным образом, из указанного промежутка (-10;10). Найти а кол-во элементов кратных 3 и сумму положительных

5-9 класс

элементов. Написать на паскале

Saltanatsc 01 февр. 2017 г., 18:45:25 (3 года назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Анна8345
01 февр. 2017 г., 19:47:59 (3 года назад)

var a:array[1..20]of integer;
     i,s,k:integer;
begin
 write('massiv:');
 for i:=1 to 20 do
  begin
   a[i]:=random(21)-10;
   write(a[i],' ');
  end;
 writeln;
 for i:=1 to 20 do
  begin
   if a[i] mod 2=1 then k:=k+1;
   if a[i]>0 then s:=s+a[i];
  end;
 write('kratnih trem:',k,' summa polozhit:',s);
end.

Ответить

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

Нужно написать программу.

заданы величины x,y действительного типа. написать программу обмена значений величин.использовать вспомогательные величины нельзя.

Даны два числа. Вывести вначале большее, а затем меньшее из них.

помогите плиз!!!
програму писать в PascalABC

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

в программе описан одномерный целостный массив А с индексами от 0 до 10. Ниже предоставлен фрагмент этой программы, в котором значения элементов массива

сначала задаются, а затем меняются.

For i:=0 to 10 do
A[i]:=i;
t:=A[0];
for i:=1 to 10 do
A[i-1]:=a[i];
A[10]:=t

Чему будут равны элементы этого массива?

1) 10 10 10 10 10 10 10 10 10 10
2)1 2 3 4 5 6 7 8 9 10 0
3) 0 0 0 0 0 0 0 0 0 0
4) 1 2 3 4 5 6 7 8 9 10 1

1). Дан массив из n элементов (n >= 4). Подсчитать среднюю арифметическую второго и предпоследнего элемента массива.

2). Дан массив из n элементов. Написать программу подсчитывающую произведение элементов массива.

1. Дан массив А из 10 элементов, которые заполняются случайным образом, числам от 0 100. Выведите массив на экран и найдите максимальный элемент массива.

2. Создать массив A из 10 элементов, заполненный случайным образом числами принадлежащих промежутку (0;20). Вывести полученный массив на экран. Вычислить количество элементов массива, значения которых не превышают среднее арифметическое значений его элементов.

1.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами до 50. Найти сумму всех четных элементов массива и их количество.

2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.

Одномерный массив из 15 элементов заполнить случайным образом числами от 7 до 12. Присвоить 8-му элементу значение 10-го элемента, увеличенное а 5, а

10-му элементу присвоить значение 13. Вывести на экран монитора первоначальный и преобразованный массивы в строчку.



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