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

Перевести программу с Pascal на Python

15.10.2019, 19:26. Показов 1973. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var a, b, t, M, R : longint;
function F(x: longint) : longint;
begin
    F := abs(abs(x - 9) + abs(x + 12) - 25) + 4;
end;
 
begin
    a := -20; b := 20;
    M := a; R := F(a);
    for t := a to b do begin
        if (F(t) <= R) then begin
            M := t;
            R := F(t)
        end
    end
    write(M + R)
end.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
15.10.2019, 19:26
Ответы с готовыми решениями:

Перевести программу из pascal в python
Помогите пожалуйста перевести программу из pascalABC в python. Заранее благодарю) var A, B, L, P, Circle:Integer; Begin ...

Нужно перевести программу с 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Эксперт Java
19530 / 11067 / 2931
Регистрация: 21.10.2017
Сообщений: 23,294
15.10.2019, 19:41
Лучший ответ Сообщение было отмечено Makk75 как решение

Решение

Python
1
2
3
4
5
6
7
8
9
10
11
12
13
def F(x):
    return abs(abs(x - 9) + abs(x + 12) - 25) + 4
 
 
a = - 20
b = 20
M = a
R = F(a)
for t in range(a, b):
    if F(t) <= R:
        M = t
        R = F(t)
print(str(M + R))
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
15.10.2019, 19:41
Помогаю со студенческими работами здесь

Перевести программу из 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