![]() |
|
Другие темы раздела | |
Pascal ABC Отсортировать периметры треугольников по возрастанию Третью неделю мучаюсь с заданием: Program Pr1; const n=10; m=100; type koor = array of real; mass = array of real; var p : mass; x,y: koor; i,j,k,l,z : integer; a,b,c,d,s : real; function per(a1,b1,c1: real): real; { Ôóíêöèÿ äëÿ âûñ÷èòûâàíèÿ ïåðèìåòðà} https://www.cyberforum.ru/ pascalabc/ thread374012.html |
Ошибка деления на ноль Pascal ABC program a1; var M,n,n1,n0:integer; i,s1,j:real; k,s,x:real; Begin writeln('введите M'); readln(m); ... |
Pascal ABC Найти количество нечетных чисел, меньших X+Y, тремя циклами (for, while, repeat until) Даны натуральные числа X и Y. Найти количество нечетных чисел, меньших X+Y. https://www.cyberforum.ru/ pascalabc/ thread373870.html |
Pascal ABC Пояснить работу и назначение кода
https://www.cyberforum.ru/ pascalabc/ thread373783.html var str1:string; x,y:integer; function DeleteMy(s:string;l,n:integer):string; var s1,s2:string; i:integer; begin for i:=1 to n-1 do s1:=s1+s; for i:=n+l to length(s) do s2:=s2+s; |
Ошибка времени выполнения: Входная строка имела неверный формат Pascal ABC const m=4; n=3; var f1,f2:text; a:array of integer; i,j,m1,m2:integer; begin assign(f1,'1.txt'); reset(f1); assign(f2,'2.txt'); rewrite(f2); |
Pascal ABC массивы Дан массив одномерный найти максималльное число повторяющего числа и вывести его колличество например 5 элементов в массиве 1 1 1 2 2 максимально повторяется 1 и его колличество 3 Добавлено через 2 минуты program laba4; var n,i,j,p,o,k,z,x,m,t,qq,max,num,x1:integer; a,b,c,d,q:array of integer; https://www.cyberforum.ru/ pascalabc/ thread373616.html |
Pascal ABC Найти максимальный из отрицательных элементов массива с четными номерами
https://www.cyberforum.ru/ pascalabc/ thread373603.html Найти максимальный из отрицательных элементов массива с четными номерами тут нужно свои подставить значения, если не трудно подмогите |
Pascal ABC Определить количество 8-значных чисел, у которых сумма цифр в цифровой записи числа меньше, чем N Дано натуральное число N. Определить количество 8-значных чисел, у которых сумма цифр в цифровой записи числа меньше, чем N. Если таких чисел нет, то вывести слово «нет». |
Pascal ABC процедура Определить процедуру p(x,y), которая для данного массива x, создает массив y такой, что y равно наименьшему (отличному от 1) делителю числа x (для всех i). https://www.cyberforum.ru/ pascalabc/ thread373568.html |
Pascal ABC массивы
https://www.cyberforum.ru/ pascalabc/ thread373563.html дана действительная матрица размером MxN.Отсортировать строки методом "пузырька" по возростанию и поменять строки со столбцами местами. |
Сложение дробей Pascal ABC Условие только такое S=1+2/3+3/4+4/5+...9/10 2/3-это дроби две третих например помогите:cry: |
Pascal ABC Подсчитать количество элементов массива, значение которых больше заданного числа А и кратны 5 1 дан массив целых чисел, состоящий из 20 элементов, заполненный случайнымм образом числами из промежутка . Найти: -Сумму элементов, имеющих нечётные индексы -Подсчитать количество элементов массива, значение которых больше заданного числа А и кратны 5 2 дан двумерный массив размером 5*5, заполненный случайными числами. Найти: -Сумму элементов, расположенных под побочной диагональю... https://www.cyberforum.ru/ pascalabc/ thread373444.html |
Старичок :)
728 / 315 / 5
Регистрация: 03.04.2011
Сообщений: 1,430
|
|
0 | |
Задания на подпрограммы. - Pascal ABC - Ответ 211331328.10.2011, 14:41. Показов 588. Ответов 0
Метки (Все метки)
Здрасти всем
![]() Есть такое задание: Задания на подпрограммы. Размеры исходных массивов задавать именованными константами в головной программе. Элементы исходных массивов задавать целыми случайными числами в диапазоне от v_min до v_max. Границы диапазона v_min и v_max задать с консоли. Ввод исходных данных и вывод результатов производить в головной программе. Запрещается использовать в подпрограммах глобальные переменные и рабочие массивы. Векторы передавать в подпрограммы как открытые массивы. Не использовать конкретные числа в качестве фактических параметров процедур – только имена переменных, массивов или имена констант. Задание 1 Создать функцию, определяющую в целочисленном квадратном массиве matrixnn сумму элементов, находящихся левее и правее главной и побочной диагоналей (“бабочка”). Элементы диагоналей в сумму не включать. Задание 2 Создать процедуру, перемножающую две матрицы по правилам матричного умножения. Предусмотреть случай, когда размеры матриц заданы некорректно Есть идеи ? Спасибо заранее. В Pascal не очень, строго не судите. ![]() Вернуться к обсуждению: Задания на подпрограммы. Pascal ABC
0
|
|
28.10.2011, 14:41 | |
Готовые ответы и решения:
0
Составление прогами по использованию подпрограммы процедур и подпрограммы функций После задания 8.04 консоль закрывается, хотя впереди еще задания и readln-ы |
28.10.2011, 14:41 | |
Помогаю со студенческими работами здесь
0
Четыре школьных задания, буду очень благодарен( задания прикреплены) лаба. 3 задания, написать для каждого задания отдельную прогу. Объединить программы для задания 1 и задания 2 в одну
|