Составьте программу которая заполняет массив A состоящая из 20 случайных целых чисел в диапазоне от 1 до 30 и выводит на экран элементы значения которых являются чётными и кратными трём

Ответы (1)

Атира 24.12.2024 1

Program rand;
var i:integer;
A:array[1..20] of integer;
begin
randomize;
for i:=1 to 20 do
begin
A[i]:=random(30,1);
if (A[i] MOD 3=0) and (A[i] MOD 2=0) then
write(A[i],' ');
end;
end.

Знаете правильный ответ?

Думаешь ответы не верны?

Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.

Воспользуйтесь поиском

Новые вопросы по предмету Информатика:

ПРЕДМЕТЫ