Название переменной, смысл

@Bygagashka · Регистрация: 06.11.2014

Author24 — интернет-сервис помощи студентам

Что такое d и к чему привязан оператор гото?
Название переменной, смысл, назначения, ограничения

х Перебирает значение х от 0 до 15 Исходная Целочисленная

Pascal

program n2;
uses crt;
var
f,x,d:Integer;
Label 1;
Begin clrscr;
For x:=0 to 15 do
Begin
f:=x*x+x+17;
For d:=2 to x-1 do
If x=x/d then
begin
Writeln('число не простое');
Goto 1;
End;
Writeln('Простые числа-',f);
1: End;
ReadKey;
end.

@EvgenTarakanov · 13.11.2014, 16:20

Честно мало что понял. Я так понимаю нужно проверить функцию f на простоту здесь же проверяется x и то достаточно проверки от 2 до 10, здесь же проверка проходит от 2 до 14(опять таки проверка x). Метка в нашей программе не используется вовсе и прописывается она немного иначе(если не подводит память) изначально идёт объявление

Pascal

label1;

код, а затем уже переход

Pascal

1	goto lbl1;

, ну и вообще переход здесь без надобности(моё мнение, считаю переходы плохим стилем программирования). Вобщем пишите техническое задание постараюсь Вам помочь! С уважением, Евгений.

@bormant · 13.11.2014, 18:00

Сообщение от EvgenTarakanov

Метка в нашей программе не используется вовсе и прописывается она немного иначе(если не подводит память)

1) используется: в строке переход по метке, в строке 17 сама метка;
2) память вас подводит;
3) приведенный вами пример неправильный.

Не стоит вводить в заблуждение новичков.

См.также:
http://www.freepascal.org/docs... efse7.html
http://www.freepascal.org/docs... fsu50.html

Добавлено через 10 минут
Bygagashka,
вы б условие привели лучше. Если имелась в виду проверка на простоту, то код неправильный, условие x=x/d истинно только при d=1, а d такого значения никогда не принимает => положительная ветка условия никогда не исполняется. Да и к проверке на простоту подобное условие никакого отношения не имеет.

@EvgenTarakanov · 14.11.2014, 01:15

bormant, виноват последний раз писал такие вещи на станке, там код сильно похож, но синтаксис немного отличается вот и напутал. А за проверку на простоту писал!

@bormant Модератор 7769 / 4598 / 2823 Регистрация: 22.11.2013 Сообщений: 13,077 Записей в блоге: 1
	13.11.2014, 18:00	3
	Сообщение от EvgenTarakanov Метка в нашей программе не используется вовсе и прописывается она немного иначе(если не подводит память) 1) используется: в строке переход по метке, в строке 17 сама метка; 2) память вас подводит; 3) приведенный вами пример неправильный. Не стоит вводить в заблуждение новичков. См.также: http://www.freepascal.org/docs... efse7.html http://www.freepascal.org/docs... fsu50.html Добавлено через 10 минут Bygagashka, вы б условие привели лучше. Если имелась в виду проверка на простоту, то код неправильный, условие x=x/d истинно только при d=1, а d такого значения никогда не принимает => положительная ветка условия никогда не исполняется. Да и к проверке на простоту подобное условие никакого отношения не имеет. 0

@EvgenTarakanov 31 / 31 / 18 Регистрация: 24.02.2012 Сообщений: 100
	14.11.2014, 01:15	4
	bormant, виноват последний раз писал такие вещи на станке, там код сильно похож, но синтаксис немного отличается вот и напутал. А за проверку на простоту писал! 0