В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Stasuyksuper06
Stasuyksuper06
01.06.2020 22:54 •  Информатика

Найдите значение силы противодействия при погружении в воду тела объемом 8 м^3

Показать ответ
Ответ:
Алина050913
Алина050913
15.06.2021 04:32
Var x,y,z,Ans:integer;
    u:real;
Begin
  Write('Введите числа x,y,z: ');
  Readln(x,y,z);
  Writeln('Что вычислить из числа ',x,' ?');
  Writeln('1 - sin; 2 - cos; 3 - tg;');
  Readln(Ans);
    case Ans of
    1: begin u:=sin(x); Writeln('sin(',x,') = ',u) end;
    2: begin u:=cos(x); Writeln('cos(',x,') = ',u) end;
    3: begin u:=tan(x);  Writeln('tg(',x,') = ',u) end;
    else Writeln('Ошибка!')    end;
  Writeln('Найти максимальное число из ряда ',u,', ',y,', ',z);
  Writeln('Без модуля - 1; по модулю - 2');
  Readln(Ans);
    case Ans of
     1: begin
         if (u>y) and (u>z) then
 Writeln('Максимальное число - ',u)
          else
                if (y>u) and (y>z) then Writeln('Максимальное число - ',y)
                  else
                      if (z>u) and (z>y) then Writeln('Максимальное число - ',z)
                        else
                            Writeln('Все числа равны.')
        end;
    2: begin
         if (abs(u)>abs(y)) and (abs(u)>abs(z)) then
 Writeln('Максимальное число - ',u)
          else
                if (abs(y)>abs(u)) and (abs(y)>abs(z)) then 
Writeln('Максимальное число - ',y)
                  else
                      if (abs(z)>abs(u)) and (abs(z)>abs(y)) then
 Writeln('Максимальное число - ',z)
                        else Writeln('Все числа равны.')
        end
    end
End.

*.pas прикрепил во вложения
0,0(0 оценок)
Ответ:
BOGDANGER
BOGDANGER
21.09.2020 22:53

Решения на фото в приложении.


Объяснение выбора(2 задание):

Для правильного выбора нужно идти методом исключения.

Флеш накопитель - внешняя память, доступный объем памяти больше 4500, удобная транспортировка.

Диск - в наилучшем случаем это DVD, максимальный объем памяти которого не превышает 4400 мб, для хранения нашего файла - сойдет.

ОЗУ - оперативная память, которая ВРЕМЕННО хранит данные, хоть и объемы ОЗУ тоже внушающие, но она не подходит.

Жесткий диск - доступная память в разы превышает вес реферата, не комфортная транспортировка, долгое подключение, еще и требует доп. питания - не подходит.

Вывод: ответ - флеш накопитель, диск.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота