Дан двухмерный массив 5на5, числа генерируются - вопрос №10318355551010 от aggrib 29.01.2020 23:33

Question

Информатика: Дан двухмерный массив 5на5, числа генерируются от -10 до 10. нужно найти все четные числа, разделить их на 2 и вывести в паскале

aggrib · Answer

const n=10;var a: array[1..n] of integer;i:integer;beginfor i:=1 to n dobegina[i]:=random(251);write(a[i], );end;writeln;for i:=1 to n dobeginif odd(a[i]) then a[i]:=2 else a[i]:=1;write(a[i], );endend....