Форум программистов, компьютерный форум, киберфорум
Python для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.79/29: Рейтинг темы: голосов - 29, средняя оценка - 4.79
0 / 0 / 0
Регистрация: 21.10.2019
Сообщений: 3

Перевести программу из pascal в python

21.10.2019, 14:41. Показов 6107. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите пожалуйста перевести программу из pascalABC в python. Заранее благодарю)
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
  var A, B, L, P, Circle:Integer;
Begin
WriteLn('Введите длину: ');
ReadLn(A);
WriteLn('Введите шириру: ');
ReadLn(B);
WriteLn('Введите дистанцию: ');
ReadLn(L);
P:=(A+B)*2;
Circle:=L div P;
L:=L-P*Circle;
If (L<=B) then
  WriteLn('LEFT');
If ((L>B) and (L<=(A+B)))then 
  WriteLn('BOTTOM');
If ((L>(A+B)) and (L<=(A+2*B)))then
  WriteLn ('RIGHT');
If ((L>A+2*B) and (L<=P)) then 
  WriteLn('TOP');
End.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
21.10.2019, 14:41
Ответы с готовыми решениями:

Перевести программу с Pascal на Python
var a, b, t, M, R : longint; function F(x: longint) : longint; begin F := abs(abs(x - 9) + abs(x + 12) - 25) + 4; end; ...

Нужно перевести программу с Pascal на Python
Пожалуйста, помогите перевести программу с Pascal на Python. program nalichie_odinacovih_chisel_v_chetirehznachnom_chisle; var ...

Перевести программу с Pascal на Python
program yt; const n = 5; var i, k:integer; a:array of integer; begin for i:=1 to n do a:=random(51); for i:=1 to n do ...

1
Автоматизируй это!
Эксперт Python
 Аватар для Welemir1
7392 / 4819 / 1246
Регистрация: 30.03.2015
Сообщений: 13,694
Записей в блоге: 29
21.10.2019, 17:02
Лучший ответ Сообщение было отмечено Restars как решение

Решение

Restars, вот твой однокурсник уже спрашивал Нужно перевести код с паскаля в питон
почему не воспользовался поиском?

я верно понимаю, что вы (даже не пытаясь что-то читать и учить) ищете решение на пайтон, если не находите, ищете на любом языкеи потом просите "переведите с языка x на пайтон"?
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
21.10.2019, 17:02
Помогаю со студенческими работами здесь

Перевести программу из Pascal в Python
Помогите пожалуйста var sl,sb,kl,kb,ss:integer; begin write('Введите цену 1 лошади sl='); readln(sl); write('Введите цену 1 быка...

Перевести программу с Pascal на Python
1) if Mas&gt;=0 then writeln('s element massiva &gt;0'); 2) if mas mod 2 =0 then writeln('k element massiva kratnui dvum'); 3) if...

Перевести программу с языка Pascal на Python
uses crt; Var n,i,pol,ipl,otr,iot,k,j:integer; f:file of integer; Begin Assign(f,'f.dat'); ReWrite(f); Writeln('Введите...

Перевести программу на язык Python или Pascal
Перевести программу на язык Python или Pascal #include &lt;iostream&gt; using namespace std; void SortirovkaVstavka(int*, int); //...

Перевести программу из Pascal в Python
var a, b, c: real; i : integer; begin b:=0; for i:=1 to 5 do begin write('Введите число: '); read(a);b:=b+a; end; c:= b/i;


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru