Задача в паскале с использованием цикла с параметром

Натуличка · 27.02.2012, 21:56

пропустила изучение темы цикл с параметром. не могу понять сути решения задач с циклом.
Данно натуральное число n/ вычислить P=(1-1/2)(1-1/3)x...x(1-1/n), где n>2
мне необходимо использовать оператор for.
прошу помощи в решении данной задачи.

Léon · 27.02.2012, 23:34

uses crt;
var n,i:integer;
p:real;
begin
clrscr;
p:=1;
writeln('input n');
readln(n);
if n>2 then begin
for i:=2 to n do
p:=p*(1-1/i);
writeln('p=',p);
end
else writeln('n doljno byt >2');
readln;
end.

Vladimir_S · 28.02.2012, 11:39

Ну так что - всё правильно, какие проблемы?

Натуличка · 28.02.2012, 19:07

ребят, объясните мне когда мы выбираем цикл с пареметром, с предусловием? так вроде правильно

AlexZir · 28.02.2012, 19:30

По-идее, цикл с параметрами это частный случай цикла с предусловием, во всяком случае, по программной реализации этой конструкции. Различие только в способе записи условия.

Например, эти две конструкции делают одно и то же:

Код:

n:=10;
counter:=0;
summa:=0;
while counter>n do 
begin
inc(summa,counter);
inc(counter);
end;

Код:

n:=10;
summa:=0;
for counter:=0 to n do
inc(summa,counter);

В обоих случаях подсчитывается сумма целых чисел от 0 до 10.

А когда именно нужно использовать тот или иной вид цикла - решать только вам. Могу посоветовать почаще использовать цикл с предусловием, это приучит вас к аккуратности и внимательности при программировании.

27.02.2012, 21:56	#1 (permalink)
Натуличка Member Регистрация: 06.02.2012 Сообщений: 46 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Задача в паскале с использованием цикла с параметром пропустила изучение темы цикл с параметром. не могу понять сути решения задач с циклом. Данно натуральное число n/ вычислить P=(1-1/2)(1-1/3)x...x(1-1/n), где n>2 мне необходимо использовать оператор for. прошу помощи в решении данной задачи.

28.02.2012, 19:30	#5 (permalink)
AlexZir support Регистрация: 19.08.2007 Адрес: Зея Сообщений: 15,797 Записей в дневнике: 71 Сказал(а) спасибо: 166 Поблагодарили 203 раз(а) в 86 сообщениях Репутация: 75760	По-идее, цикл с параметрами это частный случай цикла с предусловием, во всяком случае, по программной реализации этой конструкции. Различие только в способе записи условия. Например, эти две конструкции делают одно и то же: Код: n:=10; counter:=0; summa:=0; while counter>n do begin inc(summa,counter); inc(counter); end; Код: n:=10; summa:=0; for counter:=0 to n do inc(summa,counter); В обоих случаях подсчитывается сумма целых чисел от 0 до 10. А когда именно нужно использовать тот или иной вид цикла - решать только вам. Могу посоветовать почаще использовать цикл с предусловием, это приучит вас к аккуратности и внимательности при программировании.

27.02.2012, 21:56
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Аналогичные топики были созданы ранее, советую обратить внимание Задача в паскале Задача на Паскале Задача на Паскале и С++ Задача на Паскале Задача на Паскале

27.02.2012, 23:34	#2 (permalink)
Léon С# - learn or die Регистрация: 17.12.2011 Сообщений: 2,438 Записей в дневнике: 8 Сказал(а) спасибо: 21 Поблагодарили 49 раз(а) в 11 сообщениях Репутация: 19701	uses crt; var n,i:integer; p:real; begin clrscr; p:=1; writeln('input n'); readln(n); if n>2 then begin for i:=2 to n do p:=p*(1-1/i); writeln('p=',p); end else writeln('n doljno byt >2'); readln; end.

28.02.2012, 11:39	#3 (permalink)
Vladimir_S Специалист Регистрация: 27.08.2008 Адрес: Санкт-Петербург Сообщений: 27,807 Сказал(а) спасибо: 340 Поблагодарили 583 раз(а) в 208 сообщениях Репутация: 113184	Ну так что - всё правильно, какие проблемы?

28.02.2012, 19:07	#4 (permalink)
Натуличка Member Регистрация: 06.02.2012 Сообщений: 46 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	ребят, объясните мне когда мы выбираем цикл с пареметром, с предусловием? так вроде правильно

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070