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

4 задача нужна, 3 не нужна


4 задача нужна, 3 не нужна

👇
Ответ:
SadEngineer
SadEngineer
03.12.2020

расписал как смог надеюсь решение поймете

Объяснение:


4 задача нужна, 3 не нужна
4,7(5 оценок)
Открыть все ответы
Ответ:
alanragibov02
alanragibov02
03.12.2020
Занятия проводятся по расписанию.

Toggle Bar



 Алгоритмы 25 марта 2013 Просмотров: 8211

Алгоритмы записи алгоритмов

Выделяют три наиболее распространенные на практике записи алгоритмов:

словесный (запись на естественном языке);графический (запись с использованием графических символов);программный (тексты на языках программирования).

Словесный записи алгоритмов

Словесный записи алгоритма на естественном языке. Данный очень удобен, если нужно приближенно описать суть алгоритма. Однако при словесном описании не всегда удается ясно и точно выразить логику действий.

В качестве примера словесного записи алгоритма рассмотрим алгоритм нахождения площади прямоугольника

S=a*b,

где S – площадь прямоугольника; а, b – длины его сторон.

Очевидно, что a, b должны быть заданы заранее, иначе задачу решить невозможно.

Словестный записи алгоритма выглядит так:

Начало алгоритма.Задать численное значение стороны a.Задать численное значение стороны b.Вычислить площадь S прямоугольника по формуле S=a*b.Вывести результат вычислений.Конец алгоритма.
4,6(79 оценок)
Ответ:
vlad1269
vlad1269
03.12.2020
// PascalABC.NET 3.2, сборка 1387 от 17.02.2017
// Внимание! Если программа не работает, обновите версию!

1)
begin
  var a,b:real;
  Read(a,b);
  if (a>0) and (b>0) then Writeln('Произведение равно ',a*b)
  else Writeln('Сумма квадратов равна ',a*a+b*b)
end.

2)
begin
  var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
  for var i:=0 to a.Length-1 do
    if i.IsOdd then a[i]:=0
    else
      if (i+1) mod 5 =0 then a[i]*=2;
  a.Println;
end.

Пример
n= 17
7 -49 -21 84 87 12 27 86 -29 -55 -32 -83 -24 96 -3 -3 -78
7 0 -21 0 174 0 27 0 -29 0 -32 0 -24 0 -6 0 -78

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