71

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

10 марта 2023

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

категория: информатика



87

Var n: integer; r: array[1… 20] of integer; beginfor n: =1 to 20 dobeginreadln (r[n]); end; for n: =1 to 20 dobeginif (r[n] mod 2=0) and (r[n] mod 3=0) then write (r[n],'); end; end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...