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

Вся информация на скрине ">

👇
Открыть все ответы
Ответ:
basarbakhtiar
basarbakhtiar
09.07.2021

var

  a : array [1..9] integer;

  i : integer;

begin

  for i := 1 to 9 do

    if i mod 3 = 1 then a[i] := i

    else if i mod 3 = 2 then a[i] := sqr (i - 1)

    else a[i] := a[i - 1] div i;

  for i := 1 to 9 do

    write (a[i], ' ');

end.

 

var

  b, a : array [1..15] of integer;

  i, sa, sb : integer;

begin

  randomize;

  sa := 0; sb := 0;

  for i := 1 to 15 do

  begin

    a[i] := trunc (random (100)) + 1;

    write (a[i], ' ');

    sa := sa + a[i];

  end;

  writeln;

  for i := 1 to 15 do

  begin

    b[i] := sqr (a[i]) - a[i]);

    write (b[i], ' ');

    sb := sb + b[i];

  end;

  writeln;

  writeln (abs (sb - sa));

end.

  

4,5(79 оценок)
Ответ:
Lika050509
Lika050509
09.07.2021

мне кажется что 3D моделирование очень удобно для настоящего времени.и если люди будут улучшать свои идеи в 3д моделировании,то я уверен(а) что мир измениться к лучшему и что для человечества откроются новые перспективы. Новые вопросы в Информатика. всем привет можите написать код на Python сделать викторину по возрасту. ... Напишите как вы видите дальнейшее развитие 3D моделирования? (Своими словами). Как программы из предложенных являются программами для ЧИСТОГО моделирования объектов? * Marvelus Designer Substance Painter Autodesk 3D Max Autodesk …

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