Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin s:=0; k:=1;

'windranger'____'wind'
'ASCII'____'Ascii'
'cat'____'cat'
'винни-пух'____'Сова'
Задача 2. Запишите результат выполнения следующих стандартных процедур:
Val('23.456', x, k)
Val('-45', x, k)
Val('5.87c-5', x, k)

Найдите среднее арифметическое следующих чисел:

а) 100101102, 11001002, 1100102

б) 2268, 6416 и 6210

while k < 50 do begin

s:=s+k;

k:=k+1;

end;

write(s);

end.

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);

var n, s: integer;

begin

n := 4;

s := 0;

while n <= 8 do begin

s := s + n;

n := n + 1

end;

write(s)

end.