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

Напишите программу, которая в последовательности натуральных чисел определяет наибольшее нечётное трехзначное число. Программа на вход получает количество чисел в последовательности, а затем сами числа. Программа должна вывести одно число – наибольшее нечётное трехзначное число последовательности

Напишите программу в Паскале с использованием массивов.

👇
Ответ:

Объяснение:

max = -1

n = int(input('Введите количество чисел в последновательности: '))

for i in range(n):

x = int(input())

if x > max and x % 2 != 0 and x > 99 and x < 1000:

max = x

print(max)

4,6(70 оценок)
Открыть все ответы
Ответ:
denishka9503
denishka9503
20.07.2020

Информация — сведения о чём-либо, независимо от формы их представления. 1. Понятие информационных технологий. Применение информационных технологий в юриспруденции.

Информационные технологии (ИТ, от англ. informationtechnology, IT) — широкий класс дисциплин и областей деятельности, относящихся к технологиям создания, управления и обработки данных, в том числе с применением вычислительной техники. Сами ИТ требуют сложной подготовки, больших первоначальных затрат и наукоемкой техники. Их внедрение должно начинаться с создания математического обеспечения, формирования информационных потоков в системах подготовки специалистов.

Основные черты современных ИТ:

компьютерная обработка информации по заданным алгоритмам;хранение больших объёмов информации на машинных носителях;передача информации на значительные расстояния в ограниченное время.
4,8(74 оценок)
Ответ:
данил1780
данил1780
20.07.2020
// PascalABC.NET 3.3, сборка 1542 от 05.10.2017
// Внимание! Если программа не работает, обновите версию!

uses NumLibABC;

begin
   var (num,denom):=ReadInteger2('Числитель и знаменатель 1-й дроби:');
   var f1:=Frc(num,denom);
   (num,denom):=ReadInteger2('Числитель и знаменатель 2-й дроби:');
   var f2:=Frc(num,denom);
   f1.Print; Write('* '); f2.Print; Write('= '); (f1*f2).Print
end.

Примеры
Числитель и знаменатель 1-й дроби: 4 9
Числитель и знаменатель 2-й дроби: 3 8
4/9 * 3/8 = 1/6

Числитель и знаменатель 1-й дроби: 32432424 10213133
Числитель и знаменатель 2-й дроби: 23123 12313123
32432424/10213133 * 23123/12313123 = 749934940152/125755562844359

Числитель и знаменатель 1-й дроби: 15 2
Числитель и знаменатель 2-й дроби: 8 15
15/2 * 8/15 = 4
4,4(79 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ