Найти произведение и количество нечетных чисел из n введенных с клавиатуры
5-9 класс
|
0-конец ввода.
program z4;
var a,w:integer;
begin
a:=100;
w:=0;
while a<>0 do begin
readln(a);
if a mod 2 <> 0 then w:=w+1;
end;
writeln(w);
end.
Другие вопросы из категории
в гонке участвуют 46 автомобилей для кодирования их номеров используется минимально возможно кол-во бит. какой общий объем информация в байтах сохранит автомат. устройство инф. после достижения финиша всех машин?
Читайте также
2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.
паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль
3.Определить и вывести на экран количество трехзначных чисел,которые делятся без остатка на 5 и 21 одновременно.
4.спортсмен пробежал в 1-ый день тренеровки расстояние 10 км. В каждый следующий день он робегал на 3 км больше ,чем в предыдущий. Определить Суммарное расстояние.
5. в Пионерском лагере n отрядов с различным количеством детей. Сколько всего детей в пионерском лагере?
на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
2)Найти среднее арифметическое всех целых чисел от a до 200 (значения a и b вводятся с клавиатуры; a>=200);
найти произведение нечетных чисел из диапазона от m до n