Переведите программу из PascalABC на c# Procedure table(a:array [-30..15] of integer; var s:integer );
var k:integer;
begin
for i:=1 to 10 do
if a[i]= 0 then
begin
k:=i+1;
break;
end;
s:=0;
for i:=k to 10 do
s:=s+abs(a[i]);
writeln;
writeln('сумма элементов после первого нуля ',s);
end;​​

alinkaaa25    2   22.06.2020 18:53    0