В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
kotena555
kotena555
31.03.2020 19:36 •  Информатика

7. Определите запись следующего выражения на языке Python
х*+ (х+1)
Oxx
*2+ (+1)*3
Оx
х++2+ (7+1)**З
Ox2+(y+1)3
Ox+2+(x+1) +3​

Показать ответ
Ответ:
acherevachanna
acherevachanna
10.06.2022 04:10
Сказано было сформировать массивы с имененем А и В. Заполняем их целыми числами, так что и  объявить массивы можно как целые. Но это мелочи, не обязательные.
var    
a, b: array[1..20]of integer;  
  i, s,n: integer;    
begin  
   writeln('Массив А:');
   randomize;     
   for i := 1 to 20 do  
     begin     
     a[i] := random(100) - 50;
     write(a[i],' ');     
     if (a[i] > 0) and (i mod 2 = 0) then
        begin
        n:=n+1;   
        b[n]:= a[i];        
        s := s + b[n] * b[n];  
        end;
     end;
   writeln();
   writeln('Массив В:');
   for i:=1 to n do write(b[n]);
   writeln;
   writeln('S = ', s);
end.
0,0(0 оценок)
Ответ:
ivanova7nastya1
ivanova7nastya1
31.08.2022 03:49
Const
  destinations = 'СЗЮВСЗЮВСЗЮВ';    {Предварительно сформированная строка ориентаций}
var
  C : char;
  N1, N2, Position : integer;
begin
  write('Исходная ориентация локатора: ');
  readln(C);
  write('Первая команда поворота: ');
  readln(N1);
  write('Вторая команда поворота: ');
  readln(N2);
  Position := Pos(C, destinations) + 4;   {Устанавливаем позицию на положение заданного направления}
  Position := Position + N1; {Направление после первого поворота (Определяется destinations[Pos])}
  Position := Position + N2; {Направление после второго поворота (Определяется destinations[Pos])}
  writeln('Конечная ориентация: ', destinations[Position]);
end.  
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота