М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
mytaevafati
mytaevafati
14.04.2023 21:44 •  Информатика

Всистеме программирования pascal abc выполните проверяемое if1 для исполнителя робот(обойти препятствие и попасть в отмеченную клетку).расположение стен на поле может быть разным.

👇
Ответ:
hohodge
hohodge
14.04.2023
Так?

uses Robot;
begin
  Task('if1');
  right;
  if WallFromUp then
  begin
    down;
    right;
    up;
  end;
  if wallfromdown then
  begin
    up;
    right;
    down;
  end;
  paint;
end.

Всистеме программирования pascal abc выполните проверяемое if1 для исполнителя робот(обойти препятст
4,4(72 оценок)
Открыть все ответы
Ответ:
sonya20067
sonya20067
14.04.2023
Program abc;Const  n=3;  m=3;Var  a:array[1..n,1..m] of integer;  b,y,i,j,sum:integer;  srd:real;  Begin  Writeln('Введите числа массива: ');    For i:=1 to n do      For j:=1 to m do      Begin        Write('a[',i,',',j,']= ');        Readln(a[i,j]);        if a[i,j]>0 then           begin             sum:=sum+a[i,j];            inc(b);          end         else          If a[i,j]<0 then            Inc(y);       End;     If sum>0 then      begin       srd:=sum/1      b;      Writeln('Среднее =',srd);      end      else      Writeln('Нет положительных членов массива');     If y>0 then      begin       Writeln('Количество отрицательных элементов =',y);      end      else      Writeln('Нет отрицательных членов массива');End.
4,5(26 оценок)
Ответ:
Angel1509kl
Angel1509kl
14.04.2023

1)Монитор,(на счет магнитофона не уверен, сам по себе именно магнитофон никак не является устройством ПК, но если подразумевают пол этим словом динамик ПК, то подходит)

2)Получение

3)Электрический ток

4)Анатомический муляж

5)102 бита

6)48

7)из перечисленных ниже нет верного ответа. 568 в десятичной = 1 000 111 000 в двоичной.

8)АВИБА

9)Представленные ответы неправильны, так как не являются двоичным кодом(присутствуют двойки)+не указано к какой системе счисления принадлежит y (если x - очевидно 16-ти ричная, то y может быть как 16 так и 10

10) И снова нет верного ответа из предложенных, т.к. получится D8

11)800 бит

12) (Ячейки excel где?)

13) Аналогично 12

14)тоже

15)27

16)User-name

17)c*.c*

18)145.92.128.0

19)Верного ответа нет. Правильно: 22

20) 5

Объяснение:

4,6(45 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ