Высказывание - предложение, выражающее суждение. Если суждение, составляющее содержание некоторого высказывания, истинно, то и о данном высказывании говорят, что оно истинно.
Ответ:
var
i, j, n: byte;
x: array[1..30, 1..30]of integer;
begin
writeln('Введите кол-во строк');
readln(n);
for i := 1 to n do
for j := 1 to i do
begin
x[i, j] := 5;
end;
for i := 1 to n do
begin
writeln;
for j := 1 to i do
write(x[i, j],' ');
end;
end.
429719. 53,714875
429217 53,652125
Замените условие на следующее:
if ((a mod 4=0)or ((a mod 100<>0) and (a mod 400=0))) then ...