Var mss:array[1..9] of integer; i:integer; begin for i:=1 to 9 do mss[i]:=random(248)+2; for i:=1 to 9 do write(mss[i]:4); writeln; for i:=1 to 9 do begin if (mss[i] mod 5 = 0) then writeln(mss[i]); end; end.
Или тебе нужно не на Паскале?
Да на Паскале
Проверила еще раз, все работает
Попробуй еще раз)
for i:=1 to 9 do write(mss[i]:4); - что означает эта строчка?
вывести на экран элементы массива с первого по девятый, это нужно для проверки
а 4 в скобках?
это просто чтобы элементы не слепились в одну строчку, можно сказать, что это расстояние между ними
можно ли без нее и чем ее можно заменить?
без этой строчки вообще? Можно, но я ее написала, чтобы было видно, что программа работает