составьте программу которая заполняет массив B[1..16]случайными целыми числами в диапозоне от -10 до 20 и определяет колличество чисел кратных 5 и их
Ответы
Ответ дал:
0
var
B:array[1..16] of integer;
k, i: integer;
begin
for i:=1 to n do begin
a[i]:=random(-10,20);
if (a[i] mod 5)=0 then begin
writeln(a[i]); writeln(i); end; end;
end.
B:array[1..16] of integer;
k, i: integer;
begin
for i:=1 to n do begin
a[i]:=random(-10,20);
if (a[i] mod 5)=0 then begin
writeln(a[i]); writeln(i); end; end;
end.
Ответ дал:
0
Заполните массив 11 произвольных целыми числами,введя их с клавиатуры и найдите среди их количество и сумму отрицательных
Ответ дал:
0
я попросила в личку 0:
Ответ дал:
0
как ?
Ответ дал:
0
Заполните массив 15 произвольными числами введя их с клавиатуры и вычислите среднее арифметическое отрицательных
Ответ дал:
0
вот последняя реши пожалуйсто !
Похожие вопросы
2 года назад
2 года назад
7 лет назад
9 лет назад