Дайте полные и развернутые ответы на вопросы:
1. Какой процесс называется циклическим?
2. Что такое параметр цикла? Как он изменяется? Приведите пример использования параметра цикла.
3. Приведите пример циклического вычислительного процесса с параметром.
4. В чем разница между операторами цикла с предусловием (while) и постусловием (repeat…until)?
5. Укажите, какое значение получит переменная s после выполнения указанных операторов:
s:= 3; i:= 1; while i <6 do i:= i + 1; s:= s + i;
s:= 2; i:= 1; repeat s:= s + i; i:= i + 1 until i> 3;
s:= 0; for i:= 5 to 7 do s:= s + 1;
s:= 1; for i:= 10 downto 2 do s:= s + 1.
{
if (tnum < tden)
{
temp = tnum;
tnum = tden;
tden = temp;
}
tnum = tnum - tden;
}
gcd = tden; //вычисляем наибольший общий делитель
numerator = numerator / gcd; //делим числитель и знаменатель на
НОД, получаем сокращенную дробь
denominator = denominator / gcd;
var i,j,n:longint;
f:boolean;
begin
writeln('Введите число');
readln(n);
if n<2 then writeln('Простых делителей нет')
else
begin
write('Число ',n,' ','= 1');
for i:=2 to n do
if n mod i=0 then
begin
f:=true;
j:=2;
while f and(j<=round(sqrt(i/2)))do
begin
if i mod j=0 then f:=false
else j:=j+1;
end;
if f then write('*',i);
end;
end;
end.
Тестовое решение:
Введите число
2345
Число 2345 = 1*5*7*35*67