Квадратную матрицу, размерности не более 20, вывести на экран. Элементы - целые числа и задаются случайным образом. Помогите, пожалуйста, срочно((
10-11 класс
|
uses crt;
var
a:array[1..20,1..20] of integer;
i,j,n:integer;
begin
randomize;
read(n);
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(101)-50;
write(a[i,j]:4);
end;
writeln;
end;
end.
Другие вопросы из категории
системе и архитектуре компьютера верны?
последний символ имени и предпоследний символ фамилии...
вареньем, с орехами и глазурью. Вася не любит орехи, Эдик не ест
варенья, а Коля очень любит глазурь. Каждый ел печенье только
одного сорта. Кто ел печенье с вареньем?
Читайте также
2.Вывести на экран 10 строк, содержащие символ *, причем количество * в каждой строке должно быть равно номеру строки.
3.Пользователем вводится 2 целых числа. Вывести на экран сумму положительных четных чисел, находящихся в границах диапазона, указанного пользователем.
4. В результате работы программы формируется массив, состоящий из 10 элементов и заполненный случайными числами от 0 до 100. Вывести на экран этот же массив в порядке возрастания.
5.Вводится строка, содержащая буквы и цифры разного регистра (т.е. строчные и прописные буквы). В результате работы программы на экран выводится строка следующего вида: цифры в порядке возрастания, строчные буквы по алфавиту, прописные буквы по алфавиту.
2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент
вывести полученную матрицу на экран.
экран с 20 по 50 в строку через пробел
2.для первыз десяти элементов найти среднее арифмитическое
3.вывести на экран только четные элементы с 1 по 10 элементы массива
4.найти сумму нечетныз значений с 20 по 50 элемент
5.найти количество элементов кратныз заданному числу,введёного с клавиатуры среди всез элементок линейного массива
числа n.
№3
Вычислить значение факториала n!
№4
В диапазоне от 1 до n вывести все четные числа на экран.
№5
Найти количество чисел, которые делятся на 3 и 5, из диапазона от 1 до n.