заполните массив 12 случайными целыми числами из промежутка [-10,10]. Выведите на экран элементы массива через пробел .Найдите сумму элементов массива , находящихся на четных позициях
Ответы
Ответ дал:
0
var x,s,sum,i:integer;
mass:array[1..12] of integer;
begin
x:=0;
sum:=0;
for i:=1 to 12 do
begin
x:=x+1;
s:=random(3);
if (s mod 2)=0
then mass[i]:=random(11)
else mass[i]:=-random(11);
if (x mod 2)=0 then sum:=sum+mass[i];
write(mass[i]+' ');
end;
writeln('');
writeln('сумма чисел на четных местах = '+sum);
end.
mass:array[1..12] of integer;
begin
x:=0;
sum:=0;
for i:=1 to 12 do
begin
x:=x+1;
s:=random(3);
if (s mod 2)=0
then mass[i]:=random(11)
else mass[i]:=-random(11);
if (x mod 2)=0 then sum:=sum+mass[i];
write(mass[i]+' ');
end;
writeln('');
writeln('сумма чисел на четных местах = '+sum);
end.
Ответ дал:
0
ответил там.
Ответ дал:
0
заполните массив N( N- целое число , вводиться с клавиатуры ) случайными целыми числами из промежутка [-10,10]. Выведите на экран элементы массива через 2 пробела .Вычислите среднее арифметическое неотрицательных элементов .
Ответ дал:
0
ещё вот
Ответ дал:
0
прости, сейчас времени нету. Как только приду от репетитора - сделаю.
Ответ дал:
0
хорошо , спасибо большое
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад
9 лет назад