Варианты ответов на фотографии

1)
var k,i,n:integer;
begin
write('k = '); readln(k);
n:=0;
for i:=2 to round(sqrt(k)) do
  if k mod i= 0 then n:=n+1;
if n=0 then writeln(k,' - простое число')
else writeln(k,' - составное число');
end.

Пример:
k = 23
23 - простое число

2)
var a,b,i:integer;
function prost(n:integer):boolean;
var j,m:integer;
begin
m:=0;
for j:=2 to trunc(sqrt(n)) do
 if n mod j = 0 then inc(m);
prost:=m=0;
end;
begin
readln(a,b);
writeln('Простые числа:');
for i:=a to b do
 if prost(i) then write(i,' ');
end.

Пример:
10 30
Простые числа:
11 13 17 19 23 29

3)
var k,i,n:integer;
function prost(n:integer):boolean;
var j,m:integer;
begin
m:=0;
for j:=2 to trunc(sqrt(n)) do
 if n mod j = 0 then inc(m);
prost:=m=0;
end;
begin
readln(k);
i:=2; n:=0;
writeln('Простые числа:');
while n<k do
 begin
 if prost(i) then begin write(i,' '); n:=n+1; end;
 i:=i+1;
 end;
end.

Пример:
10
Простые числа:
2 3 5 7 11 13 17 19 23 29

 var result = 0;
 var kind = prompt("Укажите вводимую величину:1)Метр2)Сантиметр3)Киллометр"); 
if (kind === "1") { 
    var input = prompt("Укажите кол-во:");     
result = ((100 * input) / 2.54).toFixed(4);   
  alert(input + " m =" + result + " in"); }
 else { 
    if (kind === "2") {         var input = prompt("Укажите кол-во:");         result = (input / 2.54).toFixed(4);         alert(input + " cm = " + result + " in");     } else {         if (kind === "3") {             var input = prompt("Укажите кол-во:");             result = ((1000 * input) / 2.54).toFixed(4);             alert(input + " km = " + result + "in");         } else {             alert("Не верно выбрана величина!");         }
     } }