Составьте программу, которая заполняет массив а[1…

Составьте программу, которая заполняет массив а[1… 10] случайными целыми числами в диапазоне от 1 до 10 и находит сумму элементов с четными значениями иколичество элементов с нечетными значениями.

в избранное

kulish6

17 марта 2023

program f1; var a: array [1… 10] integer; k, i: integerbegin for i: =1 to 10 doreadeln (a[i]); if a[i]: =o then k: =k+1; writeln ('найти сумму четных'); writeln ('количество не четных'); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Объем видеопамяти 2,5 мб, глубина цвета 16 бит, эразрешение экрана 640*480…

Выбрать предмет или существо

Вычислить функцию в паскаль: F=(|3x|) ^2-x^2/x-1

Помогите пожалуйста Решить 2 задачи на языке Паскаль!

Среди чисел 1,4,9,16,25… найти первое число, большее n. n ввести с клавиатуры

Десятичный код латинской буквы «о» в таблице кодировки символов ASCII равен…

Пользователь компъютера вводит 100 знаков /мин

Помогите пожалуйста… Дано слово. Добавить к нему в конец и в начало столько звездочек, сколько букв в этом слове

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: