a = [[i] for i in range(10)]
for i in enumerate(a):
for j in range(1,10):
if i[0] == 0:
a[i[0]].append(j)
else:
a[i[0]].append(j*i[1][0])
for i in a:
for j in i:
print('{:3d}'.format(j), end='')
print()
print('------------------------------------')
while True:
x = int(input('Введите x: '))
y = int(input('Введите y: '))
print('Результат на основе таблицы умножения равен: ', str(a[x][y]))
z = input('Повторить? (y/n): ')
if z != 'y':
print('До встречи!')
break
a = [[i] for i in range(10)]
for i in enumerate(a):
for j in range(1,10):
if i[0] == 0:
a[i[0]].append(j)
else:
a[i[0]].append(j*i[1][0])
for i in a:
for j in i:
print('{:3d}'.format(j), end='')
print()
print('------------------------------------')
while True:
x = int(input('Введите x: '))
y = int(input('Введите y: '))
print('Результат на основе таблицы умножения равен: ', str(a[x][y]))
z = input('Повторить? (y/n): ')
if z != 'y':
print('До встречи!')
break
2. Найти наибольший общий делитель и наименьшее общее кратное двух чисел.
3. Вывести введенную строку в обратном порядке.
Решения на Pascal:
1.
var n, i: integer;
begin
read(n);
for i := 1 to n do
if odd(i) then write(i div 2 + 1, ' ')
else write(n - i div 2 + 1, ' ')
end.
2.
var a, b, a1, b1, t: integer;
begin
read(a, b);
a1 := a;
b1 := b;
repeat
t := a mod b;
a := b;
b := t;
until b = 0;
writeln('НОД=', a);
writeln('НОК=', a1 * b1 div a);
end.
3.
var s, s1: string;
i: integer;
begin
read(s);
s1 := '';
for i := length(s) downto 1 do
s1 += s[i];
write(s1)
end.