Есть ответ 👍

Сделать кроссворд главное слово неопределенность тема информация

199
258
Посмотреть ответы 1

Ответы на вопрос:


Не знаю сойдет или нет, но как бы эту давно решал. var a: array [1..20] of integer; i: integer; begin for i: =1 to 20 do  begin a[i]: =random(30)+1; if a[i] mod   3   = 0 then write (a[i],' '); end; readln; end.

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