Nanko11
20.09.2022 10:08

Составить программу
1 Ввести число. Сообщить, что больше логарифм или синус числа
2 Ввести 2 числа. Сообщить, что больше синус первого или второго
3 Ввести 2 числа, напечатать большее из них, поделив на 100
4 Ввести 3 числа. Сообщить, попадает ли первое между вторым и
третьим

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Djjhsb
13.04.2023 16:35

Вопросы

1 Моде́ль — система, исследование которой служит средством для получения информации о другой системе; представление некоторого реального процесса, устройства или концепции.

2 Информационная модель — модель объекта, представленная в виде информации, описывающей существенные для данного рассмотрения параметры и переменные величины объекта, связи между ними, входы и выходы объекта и позволяющая путём подачи на модель информации об изменениях входных величин моделировать возможные состояния

3 Формализа́ция — представление какой-либо содержательной области в виде формальной системы или исчисления.

4 мулляжи продуктов воспроизводят внешний вид

чучело птицы тоже внешний вид

заводной игрушечный автомобль - внешний вид и одну функцию,  передвижение

5 техническая это когда модель изжелеза,.а информационая это  когда все точно размера каждой детали записаны в черчеже

6 Информационная модель - это модель, дающая определённые свойства объекта, к примеру, его названия и значения. Они могут представлены в разном виде: в виде рисунков, таблиц, диаграмм и др. И данные модели тоже можно считать информационными, т.к. они имеют информацию о чём-либо.

Объяснение:

Не забудь поставить лайк и оценку)

0,0(0 оценок)
Ответ:
Дмитрий1425
19.12.2021 02:14
1)
uses crt;
const size = 10;
var a:array [1..size] of integer;
     i,p:longint;
begin
  p:=1;
  randomize;
  for i:=1 to size do
    begin
      a[i]:=random(20);
      write (a[i],' ');
      if (a[i] mod 3 = 0) then p:=p*a[i];
    end;
  writeln;
  writeln (p);
end.

2)
uses crt;
const size = 10;
var a:array [1..size] of integer;
     i:integer;
     s:real;
begin
  s:=0;
  randomize;
  for i:=1 to size do
    begin
      a[i]:=random(4)+1;
      write (a[i],' ');
      s:=s+a[i];
    end;
  writeln;
  s:=s/size;
  writeln (s);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота