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

Перевести с паскаля на питон

07.03.2019, 10:05. Показов 1068. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
var R,M0,M1,res,i,N,dat: longint;
begin
 M0 := 0;
 M1 := 0;
readln(N);
for i := 1 to N do
begin
readln(dat);
if (dat mod 2 = 0) and (dat > M0) then
M0 := dat;
if (dat mod 2 <> 0) and (dat > M1) then
M1 := dat;
end;
if (M0>0) and (M1>0) then
res := M0+M1
else res := -1;
readln(R);
if res > 0 then
writeln('Вычисленное контрольное значение: ',res);
if (R > 0) and (R = res)
then writeln('Контроль пройден')
else writeln('Контроль не пройден');
end.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
07.03.2019, 10:05
Ответы с готовыми решениями:

Перевести из паскаля в питон
uses crt; type Date=record Day:Integer; Month:Integer; Year:Integer; end; mas=array of string; var d1,d2:Date; ...

Перевести с паскаля на питон
Буду ооочень благодарна. Вот код проги: var a,i:integer; f,f1:text; begin assign(f,'input.txt'); reset(f); ...

Перевести с Паскаля на Питон
var gr,mr,gs,ms,vozrast:integer; begin writeln('vvedite god i mesyac rojdeniya'); readln(gr,mr); writeln('vvedite segodnyashniy...

2
1303 / 843 / 409
Регистрация: 12.03.2018
Сообщений: 2,305
07.03.2019, 10:16
В чем проблема?
Оператор ввода tmp = int(input())
Вывод print()
Цикл
Python
1
2
for i in range(N):
    code
Условие
Python
1
2
3
4
5
6
if <выражение>:
    code
elif <выражение>:
    code
else:
    code
mod %
and and
Никаких ";"
:= =
Этого должно хватить.
0
 Аватар для Andrey B
170 / 122 / 61
Регистрация: 06.02.2015
Сообщений: 300
08.03.2019, 07:02
Наверное, так
Python
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
def func():
    M0=0;
    M1=0;
    N=int(input('Введите N\n'))
    for i in range(N):
        dat=int(input('Введите dat\n'))
        if (dat%2==0 and dat>M0):
            M0=dat
        if ((dat%2>0 or dat%2<0) and dat>M1):
            M1=dat
            
    if (M0>0 and M1>0):
        res=M0+M1
    else:
        res=-1;
    R=int(input('Введите R\n'))
    if res>0:
        print('Вычисленное контрольное значение: ',res)
    if (R>0 and R==res):
        print('Контроль пройден\n')
    else:
        print('Контроль не пройден\n')
 
func()
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
08.03.2019, 07:02
Помогаю со студенческими работами здесь

Перевести с паскаля на питон
var a, s: integer; begin s:= 0; readln(a); while a&lt;&gt;0 do begin if (a mod 6 = 0) and (a mod 10 = 4) then s := s + a; ...

Перевести с Паскаля на Питон
Знающие люди, помогите, заранее спасибо за любую помощь ) function A(n: integer; x: real): real; begin if n = 1 then A := x ...

Перевести из паскаля в питон
program Mustafander; uses crt; var i,n,m:integer; begin Write('Enter N = ');readln(n); Write('Enter M = ');readln(m); ...

Перевести с Паскаля на питон
Помогите перевести код с Паскаля на Питон var a, b, x, y, z: real; begin Write('X = '); Readln(x); Write('Y = ');...

Перевести с паскаля на питон
var N: longint; a: array of longint; s_old, s_new: array of longint; i, j, k, r: longint; begin ...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Загрузка PNG-файла с альфа-каналом с помощью библиотеки SDL3_image на Android
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru