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

Как можно быстрее, ! паскаль 10-й класс. 1. заполнить массив из 20 элементов случайными числами от 0 до 10. распечатать его. посчитать количество элементов в массиве меньших, чем среднее арифметическое всех элементов массива. 2. ввести число. выделить цифры, посчитать количество нулевых цифр в числе. если таких нет, то выдать сообщение "нет".

👇
Ответ:
255615
255615
08.03.2023
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

** 1 **

begin
  var a:=ArrRandom(20,0,10); a.Println;
  var m:=a.Average;
  writeln('Число элементов, меньших среднего ',a.Where(t->t<m).Count)
end.

Пример
8 2 7 5 8 0 0 9 9 3 0 10 10 0 5 10 4 9 1 5
Число элементов, меньших среднего 11

** 2 **

begin
  var k:=ReadInteger('n=').ToString.Where(c->c='0').Count;
  if k=0 then Writeln('нет') else Writeln(k)
end.

Пример
n= 25204301
2
4,4(56 оценок)
Открыть все ответы
Ответ:
ooficerova
ooficerova
08.03.2023
Не хватает либо цены за билет эконом класса
либо цены за билет бизнес класса.

Uses crt;
var a,b,x,c,d:real;
begin
ClrScr;
writeln('Введите кол-во нераспроданных билетов бизнес класса (а) и кол-во нераспроданных билетов эконом. класса (б) ');
readln(a,b);
// Узнали, сколько осталось нераспроданных билетов разных классов.
c:=160*0.75-b;
// Узнали, сколько билетов продано эконом класса.
d:=160*0.25-a;
// Узнали, сколько билетов продано бизнес класса.
x:=d+c/2;
writeln('Для того, чтобы узнать сколько денег получила авиакомпания за этот рейс нужно число х: ',x,' умножить на цену билета бизнес класса, либо умножить на удвоенную цену одного билета эконом класса');
readln
end.

Или ответ: число которое выведет программа х, например, ответ: 15х

Программа проверена, если что не так пиши
4,4(5 оценок)
Ответ:
30Космос03
30Космос03
08.03.2023

Характеристика моего компьютера.

Имя объекта - компьютер. (от английского computer)

Функции объекта - Хранение, обработка и анализ данных.

Элементный состав компьютера -

Основные:

1) Монитор.

2) Клавиатура.

3) Компьютерная мышь.


4) Системный блок.

5) Колонки.

Дополнительные:


1) Веб-камера.


2) Съёмные ОЗУ-накопители.


3) Съёмные накопители.

4) Наушники.

Свойства элементов - элементный состав компьютера выполняет множество свойств, к примеру монитор необходим для того, чтобы выводить графическую или текстовую информацию. Мышь - для управления объектами на рабочем столе. (Ярлыками, папками, документами) Клавиатура - для ввода данных в сам компьютер. Колонки необходимы для вывода звука. Системный блок выполняет функцию опоры всего элементного состава компьютера.

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