Var
n,m,d,k,Max,Maxk:integer;
Begin
Write('n = ');ReadLn(n);
Write('m = ');ReadLn(m);
Maxk:=0;
For n:= m downto n do
Begin
if n>1 then k:=2
else k:=1;
d:=n div 2;
While d>1 do
Begin
if n mod d = 0 then k:=k+1;
d:=d-1
End;
if k>=Maxk then
Begin
Maxk:=k;
Max:=n;
End;
End;
WriteLn('Искомое число: ',Max);
WriteLn('Количество делителей этого числа: ',Maxk);
End.
Program Z1;
Var n,i,s: real;
Begin
write ('n=');
read (n);
S:=0;
i:=3;
while i<=n do
Begin
i:=i+4;
S:=S+i;
End;
write ('S=',S);
End.
#include <iostream>using namespace std;
int main(){ setlocale(LC_ALL,"rus"); int a,b; cout<<"a= "; cin>>a; cout<<"b= "; cin>>b; if (a<b && b % a ==0) cout<<a<<" является делителем "<<b; else if (b<a && a % b ==0) cout<<b<<" является делителем "<<a; else cout<<"меньшее число не является делителем большего"; return 0;
Операторы делают следующее: а присвоить 3. Если а меньше 4,то увеличить а на 2, следовательно значением переменной A после выполнения операторов будет 5.
2) import math
a = int(input())result = 1sqrt = 0
for i in range(a, a+6): result *= i sqrt += 1 result = math.pow(result, 1/sqrt)print ("result :", result)