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

Создать проект, который позволяет найти значение выражения 5 (х — 7) (х + 3) (х вводится с клавиатуры) с проверкой нулевых значений знаменателя 1. Опишите математическую модель решения поставленной задачи, соблюдая следующие пункты: a) Входные данные программы b) Выходные данные программы с) Поставленные условия d) Используемая формула. Напишите программу на языке программирования !

Показать ответ
Ответ:
123451499
123451499
14.05.2021 02:00

Увы, нет.

...var Y:array[1..N] of real... ошибка в написании, компилятор сообщит, что тип параметра не может быть описанием массива с границами. Пример:

var a:array [1..n] of real;                                                                                  Procedure ab(var b:array [1..n] of real);

К сожалению переменная и формальный параметр не одного типа.

Стоит использовать Type:

type ba= array [1..n] of real;                                                                                  var a: ba;                                                                                                   Procedure ab(var b:ba);

0,0(0 оценок)
Ответ:
kozina574
kozina574
22.02.2021 05:26

Python 3.6

a = [int(i) for i in input().split()]

ab = abs(a[1] - a[2])

if ab > 180:

   ab = 360 - ab

if ab % a[4] == 0:

   x = ab // a[4]

else:

   x = ab // a[4] + 1

if a[0] % a[3] == 0:

   x += a[0] // a[3]

else:

   x += a[0] // a[3] + 1

print(x)

PascalABC.NET 3.5.1

program who;

var a, b, ab, t: integer;

 d, s, x: LongInt;

begin  

 read(d, a, b, s, t);

 

 ab := abs(a - b);  

   

 if ab > 180 then

   ab := 360 - ab;  

 if ab mod t = 0 then

   x := ab div t  

 else  

   x := ab div t + 1;  

 if d mod s = 0 then  

   x := x + d div s  

 else  

   x := x + d div s + 1;  

 write(x);

end.

Объяснение:

Думаю по коду поймешь

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