var
i, n : byte;
begin
repeat
write('введите n: ');
readln(n)
until n in [1..9];
writeln('таблица умножения');
for i := 1 to 9 do
writeln(n, ' * ', i, ' = ', n * i);
writeln('таблица сложения');
for i := 1 to 9 do
writeln(n, ' + ', i, ' = ', n + i);
readln
end.
если нужны закладки(якоря) делай так, пиши тег и указывай его id
Пример:
<div id = "main">Tralalala</div>
Потом делай ссылку <a></a> и указывай ее атрибут href на # + id якоря
Пример:
<a href = "#main">Go to main</a>
<div id = "main">Tralalala</div>
Program fd;
var a,k:integer;
begin
Writeln('Ввести чётное натуральное число a');
Readln(a);
Writeln('Ввести число k');
Readln(k);
Writeln('',a div 100);
Readln(d);
Writeln('',a mod 100);
Readln(c);
if d+c>k then Write('Утверждение верно!'); else
if d+c<k then Write('Утверждение неверно!');
end.
Только для двузначного т.к. не имею на компьютере паскаль
Системное программирование — программы, обеспечивающие управление компьютерной системой, такими как процессор, ОП (оперативная память), сетевое обеспечиние и т.д.