Вопрос по информатике:
Срочно!Помогите!Напишите программу на паскале,которое определяет является ли число простым?И ещё выводит те числа на которые делится.
Пожаловаться
- 24.01.2016 14:24
- Информатика
- remove_red_eye 15653
- thumb_up 13
Ответы и объяснения 1
ReadLn(STROKA);
a:= length(STROKA);
for I:= 1 to a do
if STROKA[I] == '.' then b:= true;
if b == true
Then
WriteLn('Ты чет ваще не прост.');
Else
c:= VAL(STROKA);
End;
For i:= c downto 1 do
if c mod I == 0 then Writeln(I);
a:= length(STROKA);
for I:= 1 to a do
if STROKA[I] == '.' then b:= true;
if b == true
Then
WriteLn('Ты чет ваще не прост.');
Else
c:= VAL(STROKA);
End;
For i:= c downto 1 do
if c mod I == 0 then Writeln(I);
Пожаловаться
- 25.01.2016 15:38
- thumb_up 34
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы