Var s : String;
Begin
Readln(s);
If s[1]='<span>а' then Writeln(s);
end.
</span>
Program n1;
var i,n: integer;
begin
write('введите число: ');
readln(n);
for i:=1 to n do write(i,' ');
end.
На самом деле, когда числа выводят в столбик, их предполагают сравнивать между собой. Чтобы это делать быстро, числа нужно выровнять "по запятой". Но такого способа выравнивания нет.
Если числа целые, можно себе представить, что запятая находится правее последней цифры и мы приходим как раз к записи с выравниванием "по правому краю".
Если же числа нецелые, то мы размещаем их с одинаковым количеством знаков после запятой и при выравнивании "по правому краю" запятые опять же будут друг под другом.
В обоих вариантах числа легко сравнивать между собой по их самой левой позиции. Чем число больше, тем оно "длиннее".
1.
integer: b, d;
real : e,h;
bool: c,j;
char: A, f, j , i;
2.
256
3.
a = 32
4.
a = 40
5.
b = 48