|
|
Другие темы раздела | |
PascalABC.NET Вычислить значения Доброго времени суток, есть задачка написать модуль который будет вычислять по заданному на изображении условию. Написал ниже код, он выдаёт ошибку на "sqr" - "Нет перегруженной программы с такими типами параметров" . Подскажите пожалуйста как решить проблему. Program znach; var Zi, q,t,l: integer; var zn,a,b: real; begin write('Введите число Zi '); https://www.cyberforum.ru/ pascalabc-net/ thread2504758.html |
PascalABC.NET Вычислите среднее арифметическое положительных и среднее арифметическое отрицательных чисел Пусть дано 100 вещественных чисел,которые вводятся по одному.Вычислите среднее арифметическое положительных и среднее арифметическое отрицательных чисел. (!без массивов) |
PascalABC.NET Решение примера Вычислить https://www.cyberforum.ru/ pascalabc-net/ thread2504352.html |
PascalABC.NET Написать программу, которая определяет, попадает ли точка с заданными координатами в область, закрашенную на рисунке
https://www.cyberforum.ru/ pascalabc-net/ thread2504135.html Написать программу, которая определяет, попадает ли точка с заданными координатами в область, закрашенную на рисунке серым цветом. Результат работы программы вывести в виде текстового сообщения. |
PascalABC.NET Входная строка имела неверный формат var f, g: text; i, n: integer; m: real; begin write('Введите n: '); readln(n); assign(f, 'file.txt'); rewrite(f); |
PascalABC.NET Нарисовать параболу и двигать ее с помощью стрелок Пожалуйста напишите программу которая рисует параболу,чтобы её можно было двигать с помощью стрелок https://www.cyberforum.ru/ pascalabc-net/ thread2504058.html |
PascalABC.NET Как код подправить?
https://www.cyberforum.ru/ pascalabc-net/ thread2503631.html Значит прога делает: я ввожу скок чисел должно быть (N), какие (a) и он считает кол-во отрицательных и делит каждый положительный член этого массива (a) на последующий. Как сделать так, чтобы деленные числа он выписывал через y = ? То есть, чтоб он написал не просто -0.67 , а y= -0.67? код var i, n, x: byte; a:array of real; begin x:=0; begin Write ('Введите размер... |
Обнулить последний минимальный элемент в массиве из N элементов PascalABC.NET Меняются все,а надо только последний.Что поменять? program olimp; var a : array of longint; s,n,m,d,i,v,k : longint; begin readln(n); for i:=1 to n do read(a); k := a; v:=1; |
PascalABC.NET Можно ли было сделать легче? program olimp; var a,b : array of longint; r,k,m,v,i,n : longint; begin readln(n); for i:=1 to n do readln(a,b); m := a; for i:=1 to n do begin https://www.cyberforum.ru/ pascalabc-net/ thread2503084.html |
PascalABC.NET Вычисление N-го члена последовательности, в которой каждый следующий член равен сумме квадратов всех предыдущих
https://www.cyberforum.ru/ pascalabc-net/ thread2503051.html Всем привет, у меня такая задача : Напишите программу вычисления N-го члена последовательности, начинающейся с единицы, в которой каждый следующий член равен сумме квадратов всех предыдущих. Вот программа , которую я представил ниже, но есть одно НО , она работает не так как нужно , то есть при вычислении третьего члена она выводит число 5 ( 3 = (1)^2 + (2)^2)) , а должна выводить число 2 ,... |
Построить усеченную пирамиду в Паскале PascalABC.NET |
PascalABC.NET Вычислите год и дату рождения
https://www.cyberforum.ru/ pascalabc-net/ thread2502977.html Напишите программу которая нажав на клавиатуру выводит наш год и дату рождения одноклассника. |
Alvin Seville
|
|
26.09.2019, 20:02 | 0 |
Массив: Заменить все отрицательные элементы значениями по модулю... - PascalABC.NET - Ответ 1385625926.09.2019, 20:02. Показов 3808. Ответов 38
Метки (Все метки)
Ответ
Joy, там также нет ни слова про вещественный массив. С точки зрения универсальности - ReadArrReal - лучше, но, полагаю, что автор кода сам волен решать что использовать, поскольку уточнения нет в задании (это уже претензии к ТС, либо к составителю задания).
Вернуться к обсуждению: Массив: Заменить все отрицательные элементы значениями по модулю... PascalABC.NET
0
|
26.09.2019, 20:02 | |
Готовые ответы и решения:
38
Заменить на главной диагонали все отрицательные элементы их абсолютными значениями Ввести двумерный массив A и заменить все отрицательные элементы на ноль Отрицательные элементы массива заменить их модулями, а положительные - их удвоенными значениями Заменить в третьем столбце все отрицательные элементы нулями, все положительные элементы в 5-й строке их квадратами |
26.09.2019, 20:02 | |
26.09.2019, 20:02 | |
Помогаю со студенческими работами здесь
0
Заменить в третьем столбце все отрицательные элементы нулями, все положительные элементы в 5-й строке их квадратами В массиве все положительные элементы умножить на 10, а все отрицательные заменить на 0 все элементы, стоящие на главной диагонали заменить на противоположной по модулю Заменить все отрицательные элементы целочисленного массива |