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

Написать программы! ) заполнить массив из 15 элементов случайным образом: 1. вещественными значениями x (22

👇
Ответ:
ВладИК08123
ВладИК08123
18.04.2020
Фрагмент программы:
var
  i: integer;
  a: array[1..15] of real;

begin
  for i := 1 to 15 do
    a[i] := Random + 22;
  { Или вместо предыдущей строчки подставьте одну из следующих:
  a[i] := 10 * Random;
  a[i] := 100 * Random - 50;
  a[i] := Random;
  }
   
  {
  Тут все что еще надо
  }
end.
4,4(28 оценок)
Открыть все ответы
Ответ:
ghvghbb
ghvghbb
18.04.2020

1. При условном обозначении.

2.

num = int(input())

if num > 0:

   print("Число больше нуля")

else:

   print("Число меньше или равно нулю")

3. При большем количестве условий.

4.

num = int(input())

if num > 100:

   print("Число больше ста")

elif num > 50:

   print("Число больше пятидесяти")

elif num > 25:

   print("Число больше двадцати пяти")

else:

   print("Число меньше двадцати пяти")

print("Финальная строка")

5. Если проверка условия дает результат «да», то выбирается действие 1; в противоположном случае (то есть если проверка условия дает результат «нет») — выбирается действие 2. Таким образом, полная форма команды если определяет две ветви команд: первая выполняется, если условие истинно, вторая — если условие ложно.

6.

x = int(input())

y = int(input())

if x > 0:

   if y > 0:

       print("Первая четверть")

   else:

       print("Четвертая четверть")

else:

   if y > 0:

       print("Вторая четверть")

   else:

       print("Третья четверть")

7. Внутри условий могут быть еще условия и т.д.

4,8(75 оценок)
Ответ:
sonashkumatova
sonashkumatova
18.04.2020
// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!

a)

begin
  var (a,b):=ReadReal2('Введите через пробел два числа:');
  if a>b then Writeln('Первое число больше второго')
  else
    if b>a then Writeln('Второе число больше первого')
    else Writeln('Числа равны')
end.

b)

begin
  var (a,b):=ReadReal2('Введите через пробел два числа:');
  if a<b then Writeln('Первое число меньше второго')
  else
    if b<a then Writeln('Второе число меньше первого')
    else Writeln('Числа равны')
end.
4,7(50 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ