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

Информатика
Контрольные во Для чего предназначены электронные таблицы?
2. Назовите известные Вам табличные процессоры.
3. Как обозначается адрес ячейки?
4. Как добавить столбец или строку?
5. Как удалить столбец или строку?
6. Как отредактировать содержимое ячейки?
7. Как вводятся формулы в ячейку?
8. Какие категории функций вы можете назвать?
9. Каким образом выполняется копирование содержимого ячейки?
10. Назовите основные типы диаграмм.
11. Опишите технологию создания диаграмм.
12. Как объединить несколько ячеек и поместить в них один текст.
13. Назовите команды для форматирования ячеек?
14. Как выполнить автоформатирование таблицы?
15. Назовите известные Вам форматы.
16. Как выполнить переименование листа?
17. Как перейти с одного листа на другой?
18. Как изменить размер шрифта в ячейках?
19. Как выполнить предварительный документа перед печатью?
20. Как отсортировать данные в таблицах?
21. Как уменьшить (увеличить) размер столбца (строки)?
22. Какие команды необходимо выполнить, чтобы текст в ячейке переносился по словам.

👇
Открыть все ответы
Ответ:
aniyzelenev
aniyzelenev
04.05.2022
Var
  i, k, n1, n2: integer;

begin
  n1 := 0;
  n2 := 0;
  {предполагается, что нумерация домов начинается с 1}
  writeln('Вводите количество жителей в порядке возрастания номеров домов');
  writeln('Окончание ввода - по отрицательному значению');
  i := 1;
  repeat
    read(k);
    if k > 0 then
    begin
      if i mod 2 = 0 then n2 := n2 + k
      else n1 := n1 + k;
      i := i + 1
    end
  until k < 0;
  write(#13#10, 'Большее количество людей проживает на ');
  if n1 > n2 then writeln('левой стороне улицы.')
  else writeln('правой стороне улицы.')
end.

Тестовое решение:

Вводите количество жителей в порядке возрастания номеров домов
Окончание ввода - по отрицательному значению
13 56 25 31 98 35 72 64 -1

Большее количество людей проживает на левой стороне улицы.
4,8(79 оценок)
Ответ:
konfetabox
konfetabox
04.05.2022
Var
  i, k, n1, n2: integer;

begin
  n1 := 0;
  n2 := 0;
  {предполагается, что нумерация домов начинается с 1}
  writeln('Вводите количество жителей в порядке возрастания номеров домов');
  writeln('Окончание ввода - по отрицательному значению');
  i := 1;
  repeat
    read(k);
    if k > 0 then
    begin
      if i mod 2 = 0 then n2 := n2 + k
      else n1 := n1 + k;
      i := i + 1
    end
  until k < 0;
  write(#13#10, 'Большее количество людей проживает на ');
  if n1 > n2 then writeln('левой стороне улицы.')
  else writeln('правой стороне улицы.')
end.

Тестовое решение:

Вводите количество жителей в порядке возрастания номеров домов
Окончание ввода - по отрицательному значению
13 56 25 31 98 35 72 64 -1

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