Program n_1;
var i:integer;
begin
for i:=10 to 100 do write(i, ' ');
end.
Для создания страниц требуется виучить веб-розработку для начала.
Объяснение:
Для создания таких страниц нужно создать файл HTML в которому нужно написать скрипты разних сираниц
Например
1 страница- 1 уровня тоесть ето будет .index
2 страница- например блог ето будет .blog
Таким образом можна создавать страницы разного уровня,главное что би тот кто смотрел на сайт понимал где какая страница.Для етого используем скрипти и подписи в коде,здесь главную роль играет скрипт кода.
Надеюсь я смог обяснить принци создания интернет(веб) страниц.
Program CountA;
Uses Crt;
var a,n,x,i:integer;
begin
clrscr; // очищаем экран
write('Введите число n:');
readln(n); // ввод данных
write('Введите цифру а: ');
readln(a); // ввод данных
x:=1; i:=0; i-счётчик цифр а
while (n<>0) do // Пока n не стало равным нулю
begin
x:=n mod 10; // в x остаток от деления на 10 т.е -отдельная цифра числа
if (a=x) then i:=i+1; если есть совпадение то i увеличиваем на 1
n:=n div 10; переходим к следующему разряду числа (сотни десятки единицы)
end;
writeln('Цифра ',а,' Встречается в данном числе-', i, ' раз(а)');
readkey; // Пауза до нажатия на любую клавишу
end.
Не знаю, правильно или нет♀️
var
i: Integer;
begin
for i := 10 to 100 do
Write (i, ', ');
ReadLn;
end.