Ответы
Ответ дал:
0
Program n1;
var a: array[1..10] of integer;
i: integer;
sum: real;
begin
randomize;
sum:=0;
for i:=1 to 10 do begin
a[i]:=random(21)-10;
write(a[i],' ');
if a[i] mod 5<>0 then sum:=sum+a[i];
end;
writeln;
write(sum);
end.
var a: array[1..10] of integer;
i: integer;
sum: real;
begin
randomize;
sum:=0;
for i:=1 to 10 do begin
a[i]:=random(21)-10;
write(a[i],' ');
if a[i] mod 5<>0 then sum:=sum+a[i];
end;
writeln;
write(sum);
end.
Ответ дал:
0
Спасибо.Можешь с алгеброй еще помочь?
Ответ дал:
0
https://znanija.com/task/23623337
Вас заинтересует
1 год назад
5 лет назад
5 лет назад
8 лет назад
8 лет назад