Любое составное натуральное число K можно разложить на множители (например: 6=2*3; 220=2*2*5*11). Петя заинтересовался
разложением чисел на множители. Но среди всех чисел он выделяет
лишь те числа, в разложении которых встречаются только 3, 5 и 7 (например:
45=3*3*5; 49=7*7). Весь вечер он вычислял и получил, что самое первое число, в
разложении которого присутствуют только числа 3, 5 и 7 это число 9, следующее
число 15, затем 21. Петя начал строить ряд таких чисел. Он нашёл первые 10
чисел своего ряда: 9, 15, 21, 25, 27, 35, 45, 49, 63, 75. Петя не хочет
останавливаться на достигнутом и решил найти 200 чисел. Составьте программу,
которая Пете с++
winter_list = [1,2,12]
spring_list = [3,4,5]
summer_list = [6,7,8]
Autumn_list = [9,10,11]
N = int(input())
def check(winter_list, spring_list, summer_list, Autumn_list):
if N in winter_list:
time = 'winter'
elif N in spring_list:
time = 'spring'
elif N in summer_list:
time = 'Summer'
else:
time = 'Autumn'
return time
if N in range(12):
yeartme = check(winter_list, spring_list, summer_list, Autumn_list)
print(yeartme)
else:
print('NO')
end = input('enter smth to close program') #Не обязательная строка. Просто не даёт закрыться консоли сразу после выполнения кода
var
A: array [1..3, 1..5] of Integer;
i, j: Integer;
s: Real;
begin
Randomize;
WriteLn ('Массив:');
for i := 1 to 3 do begin // заполнение массива случайными значениями и вывод для просмотра
for j := 1 to 5 do begin
A [i, j] := Random (22) - 11;
Write (A [i, j], ' ');
end;
Writeln;
end;
for i := 1 to 3 do begin // замена элементов с четной суммой индексов на 555
for j := 1 to 5 do begin
if (i + j) mod 2 = 0 then
A [i, j] := 555;
end;
end;
WriteLn;
WriteLn ('Результат: '); // вывод результата
for i := 1 to 3 do begin
for j := 1 to 5 do begin
Write (A [i, j], ' ');
end;
Writeln;
end;
end.