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

Исполнитель Вычислитель преобразует число, записанное на экране. У исполнителя есть три команды, которым присвоены номера: 1. Прибавить `1`
2. Умножить на `2`
3. Умножить на `3`
Напишите самую короткую программу, которая преобразует число `1` в число `25`.

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

У маркірованих списках кожний абзац починається з жирної цятки. У нумерованих списках кожний абзац починається з виразу, який включає до себе номер або букву, а також роздільний знак, такий, як точка або дужки. Цифри у нумерованих списках оновлюються автоматично при додаванні або видаленні абзаців списку. Ви можете змінити тип стилю нумерації або маркерів, роздільний знак, атрибути шрифту та стилі символів, а також текст та величину відступів.

Ви не можете використовувати інструмент «Текст» для зміни маркерів або цифр у списку. Тим не менше, ви можете редагувати формат та відступи списків за до діалогового вікна «Маркери та нумерація», панелі «Абзац», розділу «Маркери та нумерація» діалогового вікна «Стилі абзаців» (якщо маркери або номери є частиною стилю).

4,5(5 оценок)
Ответ:
SkipMe
SkipMe
07.08.2020

Ошибки в программе:

Program primer - не хватает точки с запятой

Var a,b: integer;

Begin ; - не ошибка, необязательная точка с запятой

 ReadLn( a,b); - не ошибка, лишний пробел после скобки, здесь и дальше не хватает пробелов между аргументами функций, знаками

 s=a+b; - не хватает двоеточия в :=

 m:=a*b;

 d:=a:b; - переменная d не была описана; деление - это /

 WriteLn(s);

 WriteLn(m);

 WriteLn(d)

End - не хватает точки.

 

Исправленная программа:

Program primer;

Var a, b: integer;

  d: real;

Begin

  ReadLn(a, b);

  s := a + b;

  m := a * b;

  d := a / b;

  WriteLn(s);

  WriteLn(m);

  WriteLn(d)

End.

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