На шоссе расположены пункты k и r , удалённые друг от друга на 9 км.
мотоциклист выехал из пункта r в направлении, противоположном k , со скоростью 46 км/ч.
составь модель, описывающую положение мотоциклиста относительно пункта k через t часов.

ответ: s=
⋅t+
,t≥

ну думаю что лишнее число  6.. так как все остальные простые числа.

1) 

var

s: string;

begin

s: ='пробел';

writeln(s);

delete(s,4,1);

insert('д',s,4);

writeln(s);

end.

2)

var

i: integer;

a,b: string;

begin

readln(a);

b: ='';

for i: =1 to length(a) do

b: =b+a[i]+' ';

writeln(b);

end.

3)

var

a: string;

begin

readln(a);

if a[2]=a[4] then writeln('равны')

else  writeln('не равны');

end.

program zadacha6; var a,b: real; begin readln(a,b); if a> b then writeln (a) else writeln (b); end.

не? я не уверен

program fasf;

var

n,q: integer;

begin

write('введите этаж: ');

readln(n);

q: =n*4;  

writeln('квартиры: ',q,q-1,q-2,q-3);

end.