Проанализировав результаты работы некоторой программы-архиватора, были сделаны следующие выводы: объем исполняемых файлов после архивации

Рисунок: на координатных осях полуокружность в 2 и 3 четверти, с радиусом 2, а справа т.е на 1 и 4 четвертях соответственно, треугольник с вершинами в точках y=2,-2 х=2. Именно этот треугольник и заштрихован. Помогите

целочисленный массив из 30 элементов. Элементы массива могут принимать целые
значения от 0 до 100 – баллы учащихся выпускного класса за итоговый тест по
информатике. Напишите программу, которая находит и выводит номера двух соседних
элементов массива, сумма которых минимальна. Исходные данные объявлены так, как
показано ниже. Запрещается использовать переменные, не описанные ниже, но
разрешается не использовать часть из них.

int[] mas = new int [] {-1, 0, 2, -8, 4, -9, 3, -4, 9, -3 };
int i = 0;
while (mas[i] < 0)
{ i++; Console.WriteLine(mas[i]);}

//24.Определить что будет напечатано в результате выполнения фрагмента программы:
int[] mas = new int[] { -1, 0, 2, -8, 4, -9, 3, -4, 9, -3 };
int i = 5;
do i--; while (mas[i] > 0);
Console.WriteLine(i);

//25.Определить что будет напечатано в результате выполнения фрагмента программы: int[] mas = new int[] { -1, 0, 2, -8, 4, -9, 3, -4, 9, -3 };
int k = 0; foreach (int el in mas)
if (el > 0) k+=el;
Console.WriteLine(k);

end;. begin. Writeln (f('abcdefghijklm'7));. End.

второй, а tg на третьей строчки

program h;

var f:text;

x,y,z:real;

begin

assign (f,'c:\ty.txt');

reset (f);

rewrite(f);

x:=0;

while x<=3 do

begin

x:=x+0.1;

y:=sin(x);

z:=sin(x)/cos(x);

write(f,' x= ',x:4:2,' ');

write(f,'sin ',y:7:5, ' ');

write(f,'tg ',z:5:3,' ');

end;

close(f);

end.

В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] – заданий сделал первый ученик Dat[2] – второй ученик и т.д.). Определите, что будет напечатано в результате работы следующей программы.

Алгоритмический язык

алг

нач

целтаб Dat[1:12]

цел k, m , month

Dat[1]:=5; Dat[2]:=5

Dat[3]:=6; Dat[4]:=8

Dat[5]:=4; Dat[6]:=5

Dat[7]:=4; Dat[8]:=7

Dat[9]:=4; Dat[10]:=4

Dat[11]:=8

Dat[12]:=7

month := 1; m:= Dat[1]

нц для k от 2 до 12

если Dat[k] <= m то

m:=Dat[k]

все

кц

вывод month

кон