позволяет закрасить модель так чтобы она была похожа на настоящий объект -файл ,материал ,компоненты, стиль.
106
332
Ответы на вопрос:
const n=10;
var a: array [1..n] of integer;
i,s,k: integer;
begin
write('массив: ');
for i: = 1 to n do
begin
a[i]: =random (16);
write (a[i],' ');
if a[i] mod 5 = 0 then
begin
s: =s+a[i];
k: =k+1
end
end;
writeln;
if k< > 0 then writeln('среднее арифметическое элементов массива, которые делятся на 5, равно: ',s/k: 0: 3)
else writeln ('элементов массива, которые делятся на 5, нет.')
end.
Популярно: Информатика
-
missvaleria209.01.2023 19:38
-
Rollov3504.03.2023 12:26
-
1257522.01.2021 11:26
-
dratyti2004160512.11.2022 21:59
-
НАТАШАПРОСТОКВАША21.02.2021 14:27
-
borovitskii201415.12.2022 10:55
-
ольга165604.12.2022 08:57
-
Абзал11111127.01.2021 12:17
-
henrycarbone25.11.2021 01:55
-
pe4enka783472725738213.11.2022 14:45