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

, с объяснением! (PascalABC.net) Дано натуральное десятичное число n <= 32 000. Напишите
программу, в которой:
1) из цифр данного числа формируется одномерный целочисленный массив;
2) определяются наибольшая и наименьшая цифры данного
числа;
3) находятся сумма и произведение цифр, образующих данное число.

👇
Ответ:
Аннасherry
Аннасherry
26.06.2022

Программа:

Pascal:

begin

 var n := ReadInteger.ToString.ToArray.ConvertAll(ch->ch.ToDigit); // создаём переменную n, в которую вводится число и его цифры конвертируются в массив

 writeln(n);  // вывод массива

 writeln(n.Max);  // вывод максимального элемента массива

 writeln(n.Min);  // вывод минимального элемента массива

 writeln(n.Sum);  // вывод суммы элементов массива

 writeln(n.Product);  // вывод произведения элементов массива

end.

4,4(7 оценок)
Открыть все ответы
Ответ:
bearn2p0dqt1
bearn2p0dqt1
26.06.2022

домик, солнышко и качелька)))

program p1;
uses graphABC;
begin
ClearWindow(clskyblue);
line (0,200,640,200);
floodfill (50,250,cllime);
setbrushcolor (clnavy);
rectangle (80,100,180,200);
setbrushcolor (clbrown);
rectangle (110,130,140,200);
line (110,160,125,160);
line (125,160,125,160);
line (125,160,125,170);
line (125,170,120,170);
line (120,170,120,165);
line (120,165,110,165);
floodfill (120,162, clblack);
line (80,100,130,40);
line (130,40,180,100);
floodfill (130,50, clnavy);
setbrushcolor (clyellow);
rectangle (120,70,140,90);
line (130,70,130,90);
line (120,80,140,80);
setbrushcolor (clyellow);
circle (280,40,30);
line (250,30,230,10);
line (240,40,220,50);
line (240,60,220,80);
line (260,70,250,90);
line (300,70,310,90);
line (320,60,340,80);
line (320,40,340,50);
line (310,30,330,10);
setbrushcolor (clbrown);
rectangle (410,50,420,200);
rectangle (500,50,510,200);
rectangle (435,70,440,160);
rectangle (480,70,485,160);
rectangle (400,60,520,70);
rectangle (435,160,485,170);
end.

 

4,5(72 оценок)
Ответ:
ЕнотикPRo
ЕнотикPRo
26.06.2022

Зачем нужны программы распознавания текста.

С их выполняется редактирование информации, исправление ошибок, сохранение данных в нужном формате и т.

Как происходит распознавание текста?

Поэтапное сканирование и распознавание текста. ... Далее происходит проверка на предмет синтаксических и орфографических ошибок

Какие программы распознавание текста вы знаете?

Они с легкостью переведут pdf, jpg, png или «бумажный файл» в редактируемый формат для Word и прочих офисных приложений.

ABBYY FineReader.

OCR CuneiForm.

Readiris Pro.

Freemore OCR.

ABBYY Screenshot Reader.

Adobe Acrobat Pro.

Scanitto Pro.

RiDoc.

Какими пользовались?

ABBYY FineReader.

OCR CuneiForm.

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