написать программу которая определяет количество нечетных чисел среди заданных целых чисел n,помогите Пожалуйста!
10-11 класс
|
var a,n,c,s:integer;
begin
readln (n);
for a:=1 to n do
begin
readln (c);
if c mod 2 > 0 then s:=s+1;
end;
writeln(s);
end.
Пишу с телефона
Другие вопросы из категории
работы
до 6 лет – 60%,
от 6-8 – 80%,
более 8 – 100 %,
если несовершеннолетний –100 %,
зарплата работника Z рублей в день.
Читайте также
текст.
3)Написать программу, которая определяет является ли слово палиндромом.
4)Написать программу, определяющую какая из букв а или о встречается в тексте первой.
Помогите хотябы одну пожалуйста))Нужно до завтра!))
определяет количество чисел, кратных 4. Программа получает на вход
количество чисел в последовательности, а затем сами числа. В
последовательности всегда имеется число, кратное 4. Количество чисел не
превышает 1000. Введённые числа не превышают 30 000. Программа должна
вывести одно число — количество чисел, кратных 4.
2. Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3. Количество чисел не превышает 1000. Введённые числа не превыша ют 30 000. Программа должна вывести одно число — минимальное число, кратное 3.
2)Написать программу определяющую сумму всех нечетных чисел от 1 до 99
Напишите программу, которая вычисляет НОК двух чисел. Используйте функцию.