0 / 0 / 0
Регистрация: 16.01.2020
Сообщений: 4

Перевод с Pascal на Python

17.01.2020, 10:11. Показов 1763. Ответов 1

Студворк — интернет-сервис помощи студентам
ПЕРЕВЕДИТЕ КОД С ПАСКАЛЯ НА ПИТОН 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Program NoName; 
 
Var 
   m,n,i,j,y,z,l,sum_z,q,max : integer; 
   b: array[0..100] of integer; 
   a: array[0..100] of string; 
 
Begin 
  readln (m); 
  readln (n); 
  for i := 0 to n - 1 do 
    begin 
      readln(a[i]); 
      b[i] := 0; 
    end; 
  readln (l); 
  sum_z := 0; 
  for j := 0 to l - 1 do 
    begin 
      readln (i, y,z); 
      sum_z := sum_z + z; 
      b[i] := b[i] + z; 
    end; 
  max := b[0]; 
  for q := 0 to l - 1 do 
    if (max > b[q]) then 
      max := q; 
  if (sum_z < m)then 
    writeln (sum_z + 1) 
  else 
    writeln (a[max]); 
end.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
17.01.2020, 10:11
Ответы с готовыми решениями:

Перевод с Pascal на Python
Товарищи, помогите перевести код с Паскаля на Питон! Пожалуйста! program shot; var x, y: real; begin writeln( ' Введите значения х...

перевод с pascal на python
прошу перевести с паскаля на питон program While13; var Temp, A:Real; K :Integer; begin Write('Введите A: '); ...

Перевод с pascal на python
Var n2, i, n: integer; begin readln(n); n2 := 0; for i := 1 to n do begin n2 := n2 + 2 * i -...

1
Особый статус
Эксперт WindowsВирусоборец
8429 / 1708 / 87
Регистрация: 15.04.2011
Сообщений: 5,520
17.01.2020, 16:46
Фхух!
Готово! Успел?
2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
17.01.2020, 16:46
Помогаю со студенческими работами здесь

Перевод из Pascal в Python
Задача: ввести 2 числа и проверить их дружественность function dividers(x: integer): integer; var s, i: integer; begin s := 0; ...

Перевод из Pascal в Python
Всем привет, нужно перевести код из Pascal в Python. Задача - Дан целочисленный массив из 30 элементов. Элементы массива могут...

Перевод кода из Pascal в Python
1. var A, B, x: real; begin writeln('Введите коэффициенты A и B (A &lt;&gt; 0):'); write(' A = '); readln(A); { &lt;--...

Перевод задачи из Pascal в Python
Здравствуйте! Вот условие задачи: Дана строка-предложение на русском языке. Вывести самое длинное слово в предложении. Если таких слов...

перевод кода с pascal в python
Переведите, пожалуйста код c pascal в python: program solve3; var n, i, j, b, k, x, y, d: integer; a: array of array of...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

Новые блоги и статьи
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru