Составьте программу, которая находит произведение четных чисел и сумму нечетных чисел в диапазоне от 1 до 10. в PascalABC
5-9 класс
|
Program asd;
var chet,nechet,i:integer;
begin
for i:=1 to 10 do begin
If (i div 2)=0 then chet:=chet*i;
If (i div 2)=1 then nechet:=nechet+i
end;
Writeln(chet,nechet);
end.
Другие вопросы из категории
а) какой вид информации в нем содержится
б) в какой программе его открывать
в) как он создается
г) где он хранится
Читайте также
и количество элементов с нечетными значениями.
б) Составьте программу, которая заполняет массив b[1..8] случайными целыми числами в диапазоне от 1 до 10 и находит произведение элементов с нечетными значениями и количество элементов с четными значениями.
2)Составить программу которая вычисляет произведение натуральных чисел от 5 до 10.
значениями. №2 Составьте программу, которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 10 до 10 и вычисляет среднее арифметическое элементов массива. №3 Такое же как и №2, только ...элементов массива с четными значениями.
элементов с нечётными индексами
2)составьте программу,которая заполняет массив a[1..10]случайными целыми числами в диапазоне от 0 до 10,находит максимальный элемент массива,а затем вычисляет,сколько раз он встречается в массиве
значениями и сумму элементов массива с нечётными значениями