Переведите программу из 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;
Переведите программу из 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;
Похожие вопросы
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
using System;
class Program
static void Table(int[] a, out int s){
static void Main()
{
int[] a = new int[46];
int s = 0;
Table(a, out s);
}
{
int k = 0;
for (int i = 1; i <= 10; i++)
{
if (a[i] == 0)
{
k = i + 1;
break;
}
}
s = 0;
for (int i = k; i <= 10; i++)
{
s += Math.Abs(a[i]);
}
Console.WriteLine();
Console.WriteLine("сумма элементов после первого нуля " + s);
}
}