combatcat
17.01.2023 09:11

5. Найдите ошибку в примере формулы в Ехсеl. A1=A3+2*B1

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
valievaalina869
10.08.2022 13:54
1):С:\Учеб­ный\Ин­фор­ма­ти­ка\Ко­ди­ро­ва­ние ->
    С:\Учеб­ный\Ин­фор­ма­ти­ка ->
    С:\Учеб­ный ->
    С:\Учеб­ный\Ин­фор­ма­ти­ка ->
    С:\Учеб­ный\Ин­фор­ма­ти­ка\Ко­ди­ро­ва­ние ->
    С:\Учеб­ный\Ин­фор­ма­ти­ка ->
    С:\Учеб­ный ->
Не подходит, т.к. Витя опустился на n уровней, а поднялся на  n+2, что не подходит по условию.
2)С:\Учеб­ный\Ин­фор­ма­ти­ка\Ко­ди­ро­ва­ние -> 
   С:\Учеб­ный\Ин­фор­ма­ти­ка ->
   С:\Учеб­ный ->
   С:\Учеб­ный\Ин­фор­ма­ти­ка -> 
   С:\Учеб­ный\Ин­фор­ма­ти­ка\Про­грам­ми­ро­ва­ние->
   С:\Учеб­ный\Ин­фор­ма­ти­ка\Про­грам­ми­ро­ва­ние\Пас­каль
Не подходит, т.к. Витя спустился на либо на 2 уровня вниз, либо на 3, а поднялся либо на 3, либо на 4 уровня вверх, что не подходит по условию.
3)С:\Учеб­ный\Ин­фор­ма­ти­ка\Ко­ди­ро­ва­ние ->
   С:\Учеб­ный\Ин­фор­ма­ти­ка -> 
   С:\Учеб­ный -> 
   С:\Учеб­ный\Ма­те­ма­ти­ка -> 
   С:\Учеб­ный\Ма­те­ма­ти­ка\Дроби
Подходит. Витя опустился на 2 уровня вниз и поднялся на 2 уровня вверх.
4)С:\Учеб­ный\Ин­фор­ма­ти­ка\Ко­ди­ро­ва­ние -> 
   С:\Учеб­ный\Ин­фор­ма­ти­ка ->
   С:\Учеб­ный ->
   С:\ ->
   С:\Учеб­ный\ ->
   С:\Учеб­ный\Ин­фор­ма­ти­ка
Не подходит, т.к. Витя спустился на 3 уровня вниз, а поднялся на 2, что не подходит по условию.
ответ: 3)
0,0(0 оценок)
Ответ:
Sonta0004
08.11.2022 05:18
1. Примерно так учат писать программы в большинстве школ

var
  n,s:integer;

begin
  s:=0;
  repeat
    Read(n);
    if n<>0 then
      if (n mod 6=0) and (n mod 10=2) then s:=s+n
  until n=0;
  Writeln(s)
end.

Пример
16
42
18
132
94
18
0
174

Кроме этого, зачем-то требуют блок-схему  - приведена во вложении, выполнена по ГОСТ 19.701-90 (ISO 5807-85).

2. А вот так эту задачу можно решить в современном Паскале

PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  ReadSeqIntegerWhile(t->t<>0)
      .Where(t->(t mod 6=0) and (t mod 10=2)).Sum.Println
end.

И блок-схема тут вообще не нужна: она ничего не даст.

Сравнение явно не в пользу школьного "образования" - учить, как выполнять работу двадцать минут вместо двух.

На ! написать программу, которая в последовательности натуральных чисел определяет сумму всех чисел,
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота