Заполнить массив 10-ю случайными целыми числами из промежутка [5; 18] и вывести на экран каждый третий элемент.
АсяГордиенко
3
03.04.2020 16:28
5
Другие вопросы по теме Информатика
Yulchan23
14.06.2020 12:02
maks200906
15.06.2020 11:21
Denhuk
20.03.2021 07:28
Mikoсладкая
20.03.2021 07:40
annaoroku3
20.03.2021 07:42
bbcc2
20.03.2021 07:43
полина90602
20.03.2021 07:57
Dag18y5557hvvhi
20.03.2021 08:05
Популярные вопросы
- Поза ординарна робота металів ...
3 - ответь на вопросу: мұнайдың 14 литр массасы 11,2 кг. Мұнайдын 30 литрлік...
2 - Y=x²/3-3/x² знайты область вызначення функции...
1 - Отметьте, какие из данных примеров являются сложными предложениями с разными...
1 - розв язок задачи гипотенуза прямокутного трикутника доривнюе коринь из 6...
3 - Подумай, очем говорились в тексте и придумай науие текста.Текст 1.Древние...
2 - Дієслова на букву i,k,j,l,m,n,o,p,q,r,s,t,u,v,w,x,y,zбуду дуже вдячна...
2 - f(x)=1+корень из x-1 D(f)=? E(f)=? Найти область определения функции...
2 - Жауабын ким биледи айтып жибериниздерши...???...
2 - Составить 8-10 предложений с этого правила ...
3
user crt;
var
a:array{1 .. 10} of integer;
1: byte;
randomze;
begin
for i:=1 to 10 do begin
a{i}:=random(18)+5;
if (i mod 3=0) then write (a[i], ' ');
end;
end.
Объяснение: