Решите пожалуйста! Ничего не понимаю! Важно: программа должна работать!

0 голосов
19 просмотров

Решите пожалуйста! Ничего не понимаю! Важно: программа должна работать!


image

Информатика (24 баллов) | 19 просмотров
Дано ответов: 2
0 голосов

JavaScript.

Если что-то не понятно - спрашивай.


image
image
(60 баллов)
0 голосов
  1. program task31101446;
  2. var
  3.  arr: array of integer;
  4.  Sum, n, number: integer;
  5. begin
  6.  Writeln('СКОЛЬКО ЧИСЕЛ? (n): ');
  7.  Readln(n);
  8.  SetLength(arr, n);
  9.  Writeln(Chr(10), '2 И 4 ЗАДАНИЯ');
  10.  for var i := 0 to (n-1) do
  11.    begin
  12.      Read(arr[i]);
  13.      Sum := Sum + arr[i];
  14.      if arr[i] mod 2 = 0 then
  15.        Writeln('ЧЁТНОЕ ЧИСЛО - ', arr[i]);        
  16.    end;
  17.  Writeln(Chr(10), '3 ЗАДАНИЕ');
  18.  for var i := 0 to (n-1) do
  19.    if i mod 2 = 0 then
  20.      Writeln(arr[i], ' СТОИТ НА ', i, ' МЕСТЕ');  
  21.  Writeln(Chr(10), '1 ЗАДАНИЕ');
  22.  while n <> 0 do
  23.    begin
  24.      Writeln(arr[(n-1)]);
  25.      Dec(n);
  26.    end;
  27. end.

Не хотел плодить программы, поэтому всё совместил в одной. Задания идут не по порядку.

(542 баллов)