Форма планеты Земля Загрузите, распакуйте и импортируйте проект Android-приложения по ссылке
Создайте приложение для проверки ответа на вопрос какой формы Земля с выбором ответов. Реализуйте для этого приложения
следующий интерфейс
• textView с формулировкой вопроса иіd tvQuestion.
• radioGroup cid rgAnswers с четырьмя вариантами ответов (диск, шар, эллипсоид. куб, id rbDisk, bSphere, Elipsoid, rtcube
соответственно).
- button - кнопка для ответа, id butAnswer. .
• textView с результатом ответа ("Правильно!" / Неправильно!") и id tvAnswer, изначально пустой.
В случае, если ответ на выбран, при нажатии кнопки butAnswer должен вывестись ответ "Неправильно!".
Для того, чтобы выполнить проверку запустите espresso-тесты. Если вы выполнили задание верно, то все тесты пройдут успе
После того, как это произойдет найдете в Logcat строку с tag - == CHECKER. Скопируйте всю строку целиком (включая метку ври
Bone He!​

Его можно рассматривать как систему, состоящую из подсистем «аппаратное обеспечение», «программное обеспечение», «информационные ресурсы»Подсистема аппаратного обеспечения выступает в качестве надсистемы для устройств ввода, обработки, хранения и вывода информации.

Операционная система — подсистема программного обеспечения и надсистема, в состав которой входят системные и служебные программы.

Система информационных ресурсов включает в себя системы текстовых и графических файлов, звуковых файлов, файлов с видеоинформацией и т. д.

Program pr;
uses crt;

Var mas:array[1..1000, 1..1000] of integer;
N,M,i,j,k:integer;

Begin
Writeln('Введите размер матрицы N*M');
Write('N = ');
readln(N);
Write('M = ');
readln(M);

if (M>1000) or (N>1000) or (M<1) or (N<1)
then  
Writeln('Ошибка, указанные значения выходят за пределы матрицы')   else   
        Begin      
 Writeln('Введите элементы матрицы');      

k:=0; 
 for i:=1 to N do     
  for j:=1 to M do     
    Begin     
      readln(mas[i,j]);       
      if (mas[i,j] mod 2 = 0) then k:=k+1;     
    end; 
  
    Writeln();   
    Writeln('Исходная матрица');
   
   for i:=1 to N do   
     Begin     
       for j:=1 to M do     
          Begin     
             Write(mas[i,j], ' ')     
           end;     
      Writeln();   
     end;         

Writeln();   
Writeln('Количество четных элементов = ',k);      
 end;

readln;
end.