Решить в Pascal и Python : 1)Найти сумму всех - вопрос №179228561 от Uniquehatter 02.05.2020 08:49

Question

Информатика: Решить в Pascal и Python : 1)Найти сумму всех натуральных чиcел N (N 1000) кратных 11, но не кратных 3. 2)Найти произведение всех натуральных чисел от 1 до 20.

Uniquehatter · Answer

Объяснение:1)var p, i: integer;beginp := 0;for i := 1 to 999 do    if i mod 11 = 0 and i mod 3 != 0 then p := p + i;write(p);end.2)var p, i: integer;beginp :=1;for i :=1 to 20 dop := p * i;write(p);end....

Решить в Pascal и Python : 1)Найти сумму всех натуральных чиcел N (N < 1000) кратных 11, но не кратных 3. 2)Найти произведение всех натуральных чисел от 1 до 20.

Решить в Pascal и Python : 1)Найти сумму всех натуральных чиcел N (N < 1000) кратных 11, но не кратных 3.
2)Найти произведение всех натуральных чисел от 1 до 20.