chingiz2008
15.10.2021 17:27

перевести этот код Pascale в Python. program snaryad;
const g=9.8; { Ускорение свободного падения }
dx=2000; { Шаг изменения x в метрах }
var x,v0,alpha: real;

{ Функция вычисления времени для заданого расстояния x }
function t(x,v0,alpha: real):real;
begin
t:=x/v0/cos(alpha);
end;

{ Функция вычисления высоты y для заданного времени }
function y(t,v0,alpha: real):real;
begin
y:=v0*t*sin(alpha)-g*t*t/2;
end;

begin
{ Первый случай }
v0:=35*1000/60; { Начальная скорость в м/с }
alpha:=2*pi/6; { Начальный угол }
x:=0;
{ Увеличиваем x до тех пор, пока y не станет <0, т.е. снаряд не "уйдет под землю" }
while y(t(x,v0,alpha),v0,alpha)>=0 do x:=x+dx;
{ Выводим результат }
writeln('В первом случае x=',x/1000:-10:0,' км');
{ Второй случай, аналогично }
v0:=30*1000/60; { Начальная скорость в м/с }
alpha:=pi/4; { Начальный угол }
x:=0;
{ Увеличиваем x до тех пор, пока y не станет <0, т.е. снаряд не "уйдет под землю" }
while y(t(x,v0,alpha),v0,alpha)>=0 do x:=x+dx;
{ Выводим результат }
writeln('Во втором случае x=',x/1000:-10:0,' км');
readln;
end.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Pavelteknik
06.09.2020 11:22

Миллионы программистов по всему миру работают в Delphi, и многие из них создают программы для обработки и хранения данных в Delphi. Существует много информации, которую необходимо обрабатывать через визуальный интерфейс ежедневно, за исключением коммерческой и личной информации (имена людей, адреса, счета): аудиофайлы, видео, веб-страницы и многое другое. Чтобы получить необходимую информацию из такого большого количества информации, нам нужны программы, которые ее обрабатывают.\r Одна из лучших сред для создания программного обеспечения - Delphi. Это очень просто и легко выучить, понять и рассуждать логически. Delphi имеет хорошо развитую структуру программирования и программирования в целом по сравнению с другими языками. Обладает интересными рекурсивными функциями, а также решать интересные задачи.

0,0(0 оценок)
Ответ:
rodionpanchenk
08.07.2021 03:14
Сейчас в мире развиваются новые технологии. Сейчас книги не пишут в ручную, а печатают на компьютере. Нам сложно прожить без интернета "каждый день мы ищем там интересную информацию, узнаем новое, смотрим фильмы, учимся".Кто то зарабатывает в интернете. Мне кажется что информатику нужно изучать для того чтобы в будущем мы были развиты в компьютерных технологиях и умели работать за компьютером. Потому что учителя, работники офисов, врачи и еще много профессий зависят от компьютеров, а информатика учит нас быть с компьютерами на ты.
.
P.S. писал сам)
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота