Задачи в паскаль: Цикл с предусловием
а) Найти наименьшее общее кратное двух заданных натуральных чисел.
б) Дано натуральное число. Найти его наименьший делитель, отличный от 1.
Помогите , решить!!!
A) For i := 2 to min ( a, b ) do
if ( a mod i = 0 ) and ( b mod i = 0 ) then
begin
write(НОД ( , a, , b, ) = , i );
break;
end;
б) For i := 2 to n do
if ( n mod i = 0 ) then
begin
write(НД ( , n, ) = , i );
break;
end;
Прошу прощения, но мне уже нужно идти спать... а кто-нибудь другой вряд-ли поможет :(
Если что, можете написать мне личное письмо, я на него постараюсь завтра ответить.
С уважением.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
