Войти Регистрация Спроси ai-bota

Вывести на экран только четные числа сгимилированые случайным образом

Ответ:

andrianovva

07.06.2020 04:03

var
i,j,k:integer;
begin
randomize;

k=random(999);

if k mod 2 <> 0 then

k:=k+1;

write(k);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

vovadj17

15.06.2022 07:17

Спростити вираз sin7 a+sin a/cos a a-альфа...

Баэхич

15.06.2022 07:17

Надо 98 нужен развернутый ответ! не из ! определите особенности эмоционально-волелевой сферы дошкольника по следующей ситуации решив больше не огорчать маму своим , катя...

Hotaru385

15.06.2022 07:17

Указать число вторичных атомов углерода в молекуле 2,3-диметилпентана а) два б) три в) один г)четыре...

uylia7

15.06.2022 07:17

Если одно число увеличить на 20%, а вдвое большее число – на 5 %, то сумма этих чисел увеличится на а) 25% в) 30% с) 15 % д) 20% е) 10%...

koptevartem050

15.06.2022 07:17

Всумке 40 конфет. 10 из них шоколадные. человек наугад достает 7 конфет. какова вероятность того, что среди них: а)3 шоколадные б)хотя бы 1 шоколадная в) ни одной шоколадной...

Loxswe

15.06.2022 07:17

Установите последовательность событий при созревании яйцеклетки человека. запишите в таблицу соответствующую последовательность цифр. 1) удвоение днк 2) начало профазы...

ZnayNeZnay

15.06.2022 07:17

Решение интеграла. нужно подробное решение, с пояснениями, если не сложно...

natalijamatijch

15.06.2022 07:17

Политика сотрудничества и отказ от гонки вооружения. примеры...

mickeymouse1958

15.06.2022 07:17

Найдите значение cos а, если известно, что sin а = 5/13 и а принадлежит 2 четверти....

Xb000

15.06.2022 07:17

Как вы понимаете выражение гражданин мира ? охарактеризуйте достижения нтр, которые позволяют человеку осознавать себя гражданином мира. несёт ли каждый из нас ответственность...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку