S
sri
Guest
define variable a as integer. define variable b as integer. define variable i as integer initial 2.
INPUT FROM Value ( "C:\src\New folder\bingo.txt").
repeat :
IMPORT a.
b = a mod i.
if b=0 then
do:
if a=i then
do:
message " prime number"a view-as alert-box.
end.
else if a<>i then
do:
i=i + 1.
message " not prime number"a view-as alert-box.
end.
else if a < i then
do:
message "not prime number"a view-as alert-box.
end.
end.
END.
if b<>0 then
do:
i=i + 1.
b = a mod i.
message "b<>0"b view-as alert-box.
end.
end.
Output To Value( "C:\src\New folder\even.txt")append. export a space. output close. end.
end.
Continue reading...
INPUT FROM Value ( "C:\src\New folder\bingo.txt").
repeat :
IMPORT a.
b = a mod i.
if b=0 then
do:
if a=i then
do:
message " prime number"a view-as alert-box.
end.
else if a<>i then
do:
i=i + 1.
message " not prime number"a view-as alert-box.
end.
else if a < i then
do:
message "not prime number"a view-as alert-box.
end.
end.
END.
if b<>0 then
do:
i=i + 1.
b = a mod i.
message "b<>0"b view-as alert-box.
end.
end.
Output To Value( "C:\src\New folder\even.txt")append. export a space. output close. end.
end.
Continue reading...