|
|
Другие темы раздела | |
Pascal ABC Определить количество чисел кратных 2 Количество чисел вводимых с клавиатуры равно N. Определить количество чисел кратных 2. https://www.cyberforum.ru/ pascalabc/ thread1552438.html |
Pascal ABC Определить, есть ли в следующих текстах пустые операторы 1) Есть ли в следующих текстах пустые операторы? (Если есть, то отметьте в тетради под какими буквами.) а) if x>0 then x:=2 else; y:=x+1; б) if odd(k) then else k:=0; в) begin x:=2; y:=5; end; г) begin a:=true; ; b:=b or a end; д) begin if x=0 then goto 1; y:=x; 1:end Мне кажется, что а) и б) неправильные, так как после else должно что-то стоять. Также должно что-то стоять между then... |
Pascal ABC В целочисленном массиве вычислить: количество элементов, кратных 3; сумму элементов с индексами, кратными 3
https://www.cyberforum.ru/ pascalabc/ thread1552405.html Составить программу,которая в целочисленном массиве A вычисляет : a)Количество элементов,кратных 3 б)Сумму элементов с индексами,кратными 3 const n=22; var a:array of integer; k,i,s:integer; begin |
Pascal ABC Перевести числа в их символьное представление Датчик случайных чисел генерирует числа от 0 до 255.Нужно перевести числа в их символьное представление.Остановка программы- появление символа "*".Сколько символов было напечатано.Помогите дальше uses crt; var i,a:integer; begin randomize; for i:=0 to 255 do begin https://www.cyberforum.ru/ pascalabc/ thread1552346.html |
Pascal ABC Подсчитать суммы элементов массива с 1-го по 10-й Само задание: В произвольном одномерном массиве из 30 элементов(массив сформировать и вывести) подсчитать суммы элементов с 1-го по 10-й, с 11-го по 20-й, с 21-го по 30-й и вывести массив этих сумм. Необходимо разбить программу на процедуры. Var x: Array of Integer; s: Array of Integer; i: Byte; sum: Integer; BEGIN Randomize; |
Pascal ABC Перемещать круг вписанный в прямоугольник по вертикали с заданным шагом Перемещать круг вписанный в прямоугольник по вертикали с заданным шагом и задержкой в одну секунду. https://www.cyberforum.ru/ pascalabc/ thread1552202.html |
Pascal ABC Подсчитать сумму положительных четных чисел, не превосходящих 344 Напишите программу, которая в последовательности целых чисел определяет их количество и подсчитывает сумму положительных четных чисел, не превосходящих 344. Программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом ноль (ноль – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введенные... https://www.cyberforum.ru/ pascalabc/ thread1552152.html |
Pascal ABC Напишите программу, которая будет быстро и правильно производить конвертацию пароля .Британские ученые выяснили, что чаще всего взламывают пароли, содержащие группы одинаковых подряд идущих символов, пробелы и звездочки, и гораздо реже пароли, содержащие многоточия..." Услышав эту новость, Вася крепко задумался: почти все его пароли попадают в группу риска!!! Для того чтобы исправить ситуацию, он решил конвертировать все свои пароли по следующему правилу: от группы одинаковых... |
Pascal ABC Организация меню с использованием цикла repeat - until
https://www.cyberforum.ru/ pascalabc/ thread1552075.html С клавиатуры вводится сторона квадрата (куба). Организовать работу в соответствии с пунктами меню: 1. Периметр квадрата 2. Площадь квадрата. 3.Объем куба. 0. Выход. Помогите, пожалуйста, програму написать с помощью repeat- until. var d,b,a: integer; begin writeln ('Vvedite storony'); readln(a); writeln ('1 - PERIMETR KVADRATA'); writeln ('2 - PLOSHAD KVADRATA'); |
Pascal ABC Разбить число 1234 на слагаемые
https://www.cyberforum.ru/ pascalabc/ thread1552071.html Здравствуйте. как разбить число 1234 на слагаемые. Т.е 1234=1+2+3+4. Спасибо |
Напишите программу, которая будет быстро и правильно производить конвертацию пароля Pascal ABC 4. Ох уж эти ученые... Имя входного файла input.txt Имя выходного файла output.txt Максимальное время работы на одном тесте 2 секунды Ограничение по памяти 64 МБ "...Британские ученые выяснили, что чаще всего взламывают пароли, содержащие группы одинаковых подряд идущих символов, пробелы и звездочки, и гораздо реже пароли, содержащие многоточия..." Услышав эту новость, Вася крепко... |
Pascal ABC Выведите сколько денег стало у Васи 3. Уличная магия Имя входного файла input.txt Имя выходного файла output.txt Максимальное время работы на одном тесте 2 секунды Ограничение по памяти 64 МБ Вася заработал много денег. Вася обучался магии и решил за счет этого обогатиться. Он соединил все номиналы купюр в одну купюру, чем преумножил свой капитал. Наставник Васи узнал, чем он занимается, и решил его наказать. Он превратил... https://www.cyberforum.ru/ pascalabc/ thread1551992.html |
Почетный модератор
64300 / 47595 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
|
||||||
14.10.2015, 21:37 | 0 | |||||
Заполнить матрицу случайными числами и вывести на экран - Pascal ABC - Ответ 819562414.10.2015, 21:37. Показов 13799. Ответов 8
Метки (Все метки)
Сообщение было отмечено Памирыч как решение
Решение
Вернуться к обсуждению: Заполнить матрицу случайными числами и вывести на экран Pascal ABC
0
|
14.10.2015, 21:37 | |
Готовые ответы и решения:
8
Заполнить исходную матрицу случайными числами из диапазона от -50 до 50. Вывести матрицу на экран Заполнить матрицу случайными числами и вывести на экран максимальный элемент Заполнить вектор из 20 элементов случайными числами в интервале [-15;10] и вывести его на экран. Заполнить массив случайными числами и вывести на экран элементы, значения которых больше 5 и меньше 15 |
14.10.2015, 21:37 | |
14.10.2015, 21:37 | |
Помогаю со студенческими работами здесь
0
Заполнить одномерный массив m[n] случайными целыми числами от a до b и вывести его на экран.Значения a,b,c,d,n взять из таблицы. Построчно ввести матрицу целых чисел 5х5 (любые целые числа), вторую матрицу заполнить случайными числами Заполнить массив случайными числами от 1 до 100, вывести массив на экран Заполнить матрицу случайными числами и транспонировать ее |