Есть код на паскале и необходимо написать код, работающий также на python:
var a: array[1..10000] of integer; N: integer; max: integer; i, j: integer; begin readln(N); max := 0; for i := 1 to N do read(a[i]); for i := 1 to N-1 do for j := i+1 to N do if (a[i]*a[j] > max) and (a[i]*a[j] mod 14 = 0) then max := a[i] * a[j]; writeln(max); end.
Попытка сделать такое на питоне не обвенчалась успехом:
a = [] # Исходные данные N = int(input()) maxvalue = 0 for i in range(1, N = N — 1): for j in range(i = i + 1, N): if (a[i] * a[j] > maxvalue) and (a[i] * a[j] %14 == 0): maxvalue = a[i] * a[j] print(maxvalue)
Ответы (1 шт):
a = [4,7,3,14,6,3] # Исходные данные N = len(a) maxvalue = 0 for i in range(N — 1): for j in range(i + 1, N): if (a[i] * a[j] > maxvalue) and (a[i] * a[j] %14 == 0): maxvalue = a[i] * a[j] print(maxvalue)
Почти прямой аналог ввода программы на Паскале:
N = int(input()) a = [] for _ in range(N): a.append(int(input()))
Как чаще делают в Python: (N я не стал убирать)
Разбор 2 задания ЕГЭ по информатике решение в pascal и python (2019 вариант 4, Крылов С.С., Чуркина)
a = [int(s) for s in input().split()] N = len(a)
Источник: husl.ru
Помогите с заданиями по информатике
1)Дана программа:
Python
#include
using namespace std;
int main() int s,t;
cin >> s;
cin >> t;
if (s < 10 || t < 10)
cout else
cout >
Было проведено 9 запусков этой программы, при которых в качестве значений переменных s и t вводились следующие пары чисел:
(1, 2); (11, 2); (1, 12); (11, 12); (–11, –12); (–11, 12); (–12, 11); (10, 10); (10, 5).
Сколько было запусков, при которых программа напечатала «НЕТ»?
Остальные задания в виде фоток
Приложения:
Ответы на вопрос
Ответ:
Объяснение:
т.к. s и t должны быть меньше 10 по отдельности. такое условие выполняют только (1, 2) и (-11, -12).
Источник: znanijam.net
Нужно перевести программу из Pascal в Python. Нужно срочно [закрыт]
Закрыт. Этот вопрос не по теме. Ответы на него в данный момент не принимаются.
Учебные задания допустимы в качестве вопросов только при условии, что вы пытались решить их самостоятельно перед тем, как задать вопрос. Пожалуйста, отредактируйте вопрос и укажите, что именно вызвало у вас трудности при решении задачи. Например, приведите код, который вы написали, пытаясь решить задачу
Закрыт 3 года назад .
program zadanie10; var x,y,a: integer; begin writeln(‘Введите значения x и y’); readln(x,y); if x>y then begin a:=x; x:=y; y:=a; writeln(‘x=’,x); writeln(‘y=’,y); end; end.
program zadanie12; var x, y: integer; begin writeln(‘x = ‘); readln(x); if x < 0 then y := -1 else if x = 0 then y := 0 else if x >0 then y := 1; writeln (‘y = ‘, y); end.
Источник: ru.stackoverflow.com