1.ипполит задумал трёхзначное число, которое при делении на 15 даёт в остатке 11, а при делении на 11 даёт в остатке 9. напишите

Question

Информатика: 1.ипполит задумал трёхзначное число, которое при делении на 15 даёт в остатке 11, а при делении на 11 даёт в остатке 9. напишите программу, которая находит все такие числа. в паскале. 2.с клавиатуры вводится натуральное число n. программа должна найти факториал этого числа (обозначается как n! ) – произведение всех натуральных чисел от 1 до n. например, 5! = 1 • 2 • 3 • 4 • 5 = 120.3.натуральное число называется числом армстронга, если сумма цифр числа, возведенных в n-ную степень (где n – количество

nvlasc · Answer

1)Var  i:integer; Begin for i := 100 to 999 do if (i mod 15 = 11) and (i mod 11 = 9) then writeln(i); End. 2)Var  i,n,s:integer; Begin read (n); s := 1; for i := 1 to n do s := s * i; write(s); End. 3)Var i,j,k:integer; Begin for i:=1 to 9 do for j:=0 to 9 do for k:=0 to 9 do if i*i*i+j*j*j+k*k*k=i*100+j*10+k then writeln(i*100+j*10+k); End....

Популярные вопросы