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

Pascal ABC

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

Заполните двумерный массив, замените отрицательные элементы нулями - Pascal ABC

03.04.2014, 18:34. Просмотров 276. Ответов 1
Метки нет (Все метки)

Две задачи:

5. Заполните двумерный массив, замените отрицательные элементы нулями.

7. Используя процедуру вычисления степени числа, вычислить значение выражения: y=a1*x4+a2*x3+a3*x2+a4*x+a5 (вероятно числа это степени, но я всё же написал я именно так как написано в распечатке с заданиями).
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
03.04.2014, 18:34
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Заполните двумерный массив, замените отрицательные элементы нулями (Pascal ABC):

Дано двумерный массив целых чисел. Все отрицательные элементы заданного массива замените разницей их индексов - Pascal ABC
Дано двумерный массив целых чисел. Все отрицательные элементы заданного массива замените разницей их индексов.

Замените все отрицательные элементы массива нулями - Pascal ABC
6. Создайте одномерный массив, в который пользователь введет с клавиатуры значения элементов. Выведите на экран значения элементов массива....

Двумерный массив. Заменить все отрицательные числа нулями. Подсчитать сумму положительных - Pascal ABC
1) Двумерный массив 3 на 3 заполнить вводом чисел с клавиатуры. Вывести полученный массив. Заменить все отрицательные числа нулями....

В заданном массиве Х(N) замените нулями все отрицательные компоненты, непосредственно предшествующие его максимальной компоненте - Pascal ABC
Решите пожалуйста! В заданном массиве Х(N) замените нулями все отрицательные компоненты, непосредственно предшествующие его максимальной...

Ввести с клавиатуры непустой массив чисел и заменить нулями все отрицательные элементы - Pascal ABC
Здравствуйте! Нужна помощь по написанию 2-х программ в ABC паскале. 1.Напишите программу, которая вводит с клавиатуры непустой массив...

Задан двухмерный массив, состоящий из n строк и n столбцов. Заменить в этом массиве все отрицательные элементы нулями - Pascal ABC
Задан двухмерный массив, состоящий из n строк и n столбцов. Заменить в этом массиве все отрицательные элементы нулями

1
Drovoseck
54 / 54 / 16
Регистрация: 01.01.2014
Сообщений: 214
03.04.2014, 21:42 #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
uses
 crt;
 
 var
 A : array [1..5,1..5] of Integer;
 i,j,n : integer;
  begin
  
 For i := 1 to 5 do
  for j := 1 to 5 do
   begin
  Randomize;
  n := Random(2);   // èñïîëüçóåì äîïîëГ*èòåëüГ*ГіГѕ ïåðåìåГ*Г*ГіГѕ ГІ.ГЄ. Random(x) Г*ГҐ Г°Г*áîòГ*ГҐГІ Г± îòðèöГ*òåëüГ*ûìè Г·ГЁГ±Г«Г*ìè  (n ìîæåò ïðèГ*ГїГІГј Г§Г*Г*Г·ГҐГ*ГЁГҐ 0 èëè 1 )
   if n=0 then        // åñëè n = 0
  A[i,j] := Random(20) else // ГЁГ*Г*Г·ГҐ
   A[i,j] := Random(20) *(-1);
  end;         {Г‡Г*ïîëГ*ГїГҐГ¬ ГЊГ*Г±Г±ГЁГў ГђГ*Г*äîìГ*ûìè Г·ГЁГ±Г«Г*ìè îò -19 äî 19 }
  
 For i := 1 to 5 do
  for j := 1 to 5 do
 if A[i,j] < 0 then
  A[i,j] := 0;
  
 
 end.
2
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
03.04.2014, 21:42
Привет! Вот еще темы с ответами:

Все отрицательные элементы массива заменить нулями, элементы больше 3 увеличить на 1 - Pascal ABC
Дан массив А={-2;-1;3;0;3;4;5;5;8}. Нужно сформировать новый массив N по следующим правилам: все отрицательные элементы заменить нулями,...

Дана действительная квадратная матрица порядка 12. Замените нулями все ее элементы, расположенные на главной диагонали и выше нее. - Pascal ABC
Дана действительная квадратная матрица порядка 12. Замените нулями все ее элементы, расположенные на главной диагонали и выше нее.

Массив. В вещественном векторе отрицательные элементы заменить нулями - Pascal
Помогите написать программу, а то я мне в срок надо сдать её а я не разбираюсь в этом, плизззззз ! Ща напишу задачу : Задача№1 В...

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


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

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

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