Составьте программу, которая формирует массив из 10 случайных целых чисел от 5 до 15 и подсчитывает количество нечетных чисел.(и выводит их)
5-9 класс
|
var
a:array[1..15] of integer;
i:integer;
begin
for i:=1 to 10 do
begin
a[i]:=random(5,15);
if a[i] mod 2 <>0 then
write(a[i],' ');
end;
end.
Другие вопросы из категории
уровень вниз. В результате он оказался в каталоге С:\Школа\Уроки Информатика. Запишите полный путь каталога, с которым пользователь начал работу.
1) КОБАТБРО
2) ЧДЕАРАПЕ
3) НИРОКОЕВАДИ
4) ЕНЛТШАП
Читайте также
>б) сумму чисел, не превышающих 10
в) сумму чисел, кратных трём
плииз, каждую задачу отдельно.. если не уверенны не пишите.. срочно!!
Составьте программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет:
1). сумму чисел, не превышающих 10;
2). сумму чисел,кратных 3. Помогите пожалуйста,написать эту программу на PaskalABC.
а) среднее арифметическое нечётных чисел
Составьте программу , которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет их сумму