ariko010
21.02.2023 10:51

Паскаль ,через
С Клавиатуры вводиться Границы промежутка - 2 числа (от 1 до
20). Написать программу, которая найдет сумму и произведение всех
целых чисел промежутка включительно и вывода результат на
экран
program 1;
var
i, dobutok, suma :integer;
begin
dobutok:=1;
suma:=0;
for i:=1 to 20 do
begin
dobutok:=dobutok*i;
suma:=suma+i;
end;
write('dobutok = ',dobutok, ' , suma = ',suma);
end.
Как сделать чтоб в этой программе границы вводились С КЛАВИАТУРЫ?

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
АндрейXXXМ
14.11.2022 02:55
<!DOCTYPE html>
<html>
<head>
<meta charset="UTF-8">
<title></title>
</head>
<body bgcolor=lightgrey>
<font color=red face="Arial"><h1 align=center>Иванов</h1>
<h2 align=center>Иван Иванович</h2>
</font>
<hr width=50%>
<a href="document2.html">На страницу 2</a>
</body>
</html>

<!DOCTYPE html>
<html>
<head>
<meta charset="UTF-8">
<title></title>
</head>
<body bgcolor=lightgrey>
<font color=blue face="Arial"><h1 align=center>Иванов</h1>
<h2 align=center>Иван Иванович</h2>
</font>
<hr width=50%>
<font face="Times New Roman">
<ul>
Список группы:
<li> Чел1
<li> Чел2
<li> Чел3
<li> Чел4
<li> Чел5
<li> Чел6
</ul>
<ul type=square>
Список отсутствующих:
<li> Чел1
<li> Чел2
<li> Чел3
</ul>
</body>
</html>
0,0(0 оценок)
Ответ:
Ирина1895031
23.01.2022 17:01

Код (написан на Go): https://pastebin.com/0pKETCwQ

За качество кода прощения, сам еле разобрался в теме)

Объяснение:

Необходимо узнать пройденное расстояние за t секунд у двух велосипедистов:

s1 = u * t; s2 = v * t (в примере они равны 200 и 160 соответственно)

Также спустя t секунд стартует электромобиль, в этот момент его пройденное расстояние равно нулю.

Из условия знаем, что электромобиль сначала ОБОГНАЛ одного, а затем и другого велосипедиста. Для того, чтобы обогнать двоих, скорость электромобиля должна быть больше максимальной скорости из двух велосипедистов (в примере u > v, значит, скорость электромобиля точно больше u)

Теперь поиграем со скоростью электромобиля -- пусть оно будет равно, допустим, 11:

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

x = s / (k - v), где s - пройденное расстояние велосипедистом, k - скорость электромобиля и v - скорость велосипедиста

Из условия:

x1 - x2 = d, где d - интервал между моментами обгона, а x1 и x2 - формулы сверху относительно каждого из велосипедистов

А теперь наступает полная алгебра. Дальше я распишу всё на листочке, где все значения будут взяты из примера.

Мы получили два корня, что с ними делать? Во-первых, вспомним, что скорость электромобиля должна быть выше наибольшей скорости двух велосипедистов, а во-вторых, оба корня можно проверить по выше написанной формуле. Если на самом деле равенство выполняется, то это ответ к нашей задаче :)

Вроде ничего не упустил)


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