Исправить ситаксические ошибки в программе которая в тексте меняет слово 77777 на слово 00000

Var s: string;

d,i:integer; 

begin

s:='177777277777377777477777;

d:=length(s);

for i:=0 to d - 4 begin

if copy(s,i,5)=00000 then begin

delete(s,i,5);

end

end;

writeln(s)

end. 

В прямоугольном треугольнике один из катетов равен 5√3 см. Найдите гипотенузу, если угол,прилежащий к данному катету, равен 30 градусам

Какие из изображенных веществ являются изомерами? Выпишите их формулы и назовите. Существуют ли еще изомеры данного состава?   а) СН3-СН2-СН=СН2   б) СН3-СН2-СН2-СН3   в) СН3-СН2-С(СН3)=СН2   г) СН3-С(СН3)=СН2   д) СН2=С(СН3)-СН3

Решите задачи.

а)Девочки взяли в библиотеке три книги.В одной книге 30 страниц , в другой на 6 страниц меньше , чем в первой , а в третьей сколько же , сколько и во второй.Сколько страниц в трёх книгах?

б)Ученики поехали на экскурсию в трёх автобусах.В одном автобусе было 24 человека , это на 6 человек меньше , чем во втором , и на 3 больше , чем в третьем.Сколько учеников поехало на экскурсию?