Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal (Паскаль)

Войти
Регистрация
Восстановить пароль
 
TurboPascal2013
0 / 0 / 0
Регистрация: 24.02.2013
Сообщений: 6
#1

Заполнить двумерный массив размера 5 на 6 случайными числами - Pascal

13.04.2013, 11:29. Просмотров 1121. Ответов 2
Метки нет (Все метки)

Задали задачку,

Заполнить двумерный массив размера 5 на 6 случайными числами. Вывести его на экран и определить количество четных элементов

Помогите пожалуйста
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.04.2013, 11:29
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Заполнить двумерный массив размера 5 на 6 случайными числами (Pascal):

Заполнить двумерный массив случайными числами - Pascal
Задача на Паскале: Заполнит двумерный массив размерностью N*M(константы) случайными числами и определить среднеквадратичное отклонение...

Заполнить двумерный массив случайными неповторяющимися числами без использования множеств - Pascal
Заполнить двухмерный массив случайными не повторяющимися чмслами. вся загвоздка в том, что это нужно сделать без использования множеств. ...

Дан двумерный массив A[5,6]. Заполнить его случайными числами в промежутке от 30 до 100, сравнить суммы элементов столбцов, вывести сумму наибольшего - Pascal
Дан двумерный массив A. Заполнить его случайными числами в промежутке от 30 до 100, сравнить суммы элементов столбцов, вывести сумму...

Заполнить матрицу размера М*N случайными числами. Вычислить сумму минимального и максимального элементов матрицы. - Pascal
Помогите пожалуйста

Как заполнить массив случайными числами -20 до 20 - Pascal
Может кто подсказать как завести в массив случайные числа от -20 до 20 ???оч надо!!

Заполнить массив А(n,m) целыми случайными числами - Pascal
Помогите решить,очень надо.Заполнить массив А(n,m) целыми случайными числами таким образом чтобы и в каждой строке и в каждом столбце...

2
Nimo
34 / 25 / 6
Регистрация: 06.12.2012
Сообщений: 144
13.04.2013, 13:49 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
    Program Massiv;
    Uses CRT;
 
    Const
        MAX1 = 5;
        MAX2 = 6;
 
    Type
        TMas = Array[1..MAX1,1..MAX2] Of Integer;
 
    Var
        Mas : TMas;
        R, K, Check : Integer;
 
    Begin ClrScr; Randomize;
 
    Check := 0;
    For K := 1 To MAX1 Do Begin
      For R := 1 To MAX2 Do Begin
         GoToXY(R*3,K*3);
        Mas[K,R] := Round(Random*10+1);
         If (Mas[K,R] mod 2 = 0) Then Inc(Check);
        Writeln(Mas[K,R]);
      End;
    End;
 
    Writeln;
    Writeln('4etnih elementov : ', Check);
    Readln;
    End.
0
TurboPascal2013
0 / 0 / 0
Регистрация: 24.02.2013
Сообщений: 6
14.04.2013, 18:08  [ТС] #3
Не могли бы облегчить решение задачи , это для школьника . Спасибо
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.04.2013, 18:08
Привет! Вот еще темы с ответами:

Заполнить массив случайными числами из отрезка (0,В) - Pascal
Заполнить массив случайными числами из отрезка (0,В)

Заполнить массив случайными числами и вывести на экран отсортированный массив. - Pascal
Заполнить массив случайными числами и вывести на экран отсортированный массив. Добавлено через 3 минуты 43 секунды очень срочно!!! ...

Заполнить массив случайными числами в заданном интервале - Pascal
Заполните массив C случайными числами в интервале от 5 до 15 и вывести его на экран

Заполнить массив из 1000 элементов случайными числами - Pascal
Заполнить массив из 1000 элементов случайными числами. Найти мат ожидание и дисперсию


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru