Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
nvanislavskaya
26.02.2023 11:55 •
Информатика
Имеется массив на n чисел, заменить все отрицательные числа на 0 и вывести этот массив.
Ответ:
mammedova75
05.10.2020 09:11
Const n=100;
var m:array[1..n] of integer;
i:integer;
begin
readln(n);
for i:=1 to n do
begin
read(m[i]);
if m[i]<0 then m[i]=0;
end;
for i:=1 to n do
write(m[i], ' ');
end.
Константой задано число n.
Во второй строке задано n чисел для массива.
0,0
(0 оценок)
Ответ:
hdjddngddh
05.10.2020 09:11
#include <bits/stdc++.h>
using namespace std;
int main()
{
int n;
cin>>n;
int arr[n];
for(int a = 0; a<n; a++)
{
cin>>arr[a];
}
for(int i = 0; i<n; i++)
{
if(arr[i]<0) arr[i]=0;
}
for(int a = 0; a<n; a++)
{
cout<<arr[a]<<" ";
}
}
0,0
(0 оценок)
Популярные вопросы: Информатика
dimanichaev799
09.10.2020 17:17
:найти произведение нечётных чисел от 1 до 15. в преложенном тексте программы найдите ошибки. programm z_1; var i,p : real; beigin; p=0; i=1; write i 15 to beigin;...
global234
04.02.2023 08:16
Программирование pascal. изменить определенное значение в массиве, если значение отрицательное, то поменять знак элемента....
unucozi
19.06.2020 11:51
Паскаль тема строки 1 )с клавиатуры вводится строка. подсчитать сколько раз в ней встречается точка. 2) с клавиатуры вводится строка. удалить из неё все лишние пробелы,...
vaierchik
19.06.2020 11:51
Паскаль тема строки 1)с клавиатуры вводится строка, состоящая из трёх слов. слова отделяются друг от друга ровно одним пробелом. поменять местами 2 и 3 слова. 2)с...
puzhalina77Frik
16.12.2021 15:18
Составить программу - конвертер, которая запрашивает тип единицы измерения времени: 1 - секунда, 2 - минута, 3 - час, 4 - сутки, а также число - значение в этой...
Samuel11
08.04.2021 11:50
Исправить ошибки в паскале program exp3; const m=5; n=3; type matr = array [1..m,1..n] of integer; var m: matr; b, i,j, k : integer; повторно объявленный идентификатор...
максимус67
08.04.2021 11:50
Опишите основные этапы обработки информации с обычного микрокалькулятора....
Матемитик111111111
03.07.2021 18:15
З яких графічних примітивів може складатися графічне зображення у текстовому документі? а) Прямої та кривої б) прямої та ламаної в) кривої та ламаної г) лінії та...
ratmir10
17.04.2021 03:12
кто сможет написать программу для этого уравнения на dev c++...
ilaida1
06.04.2020 08:35
Обмен файлами в операционной системе (Windows...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var m:array[1..n] of integer;
i:integer;
begin
readln(n);
for i:=1 to n do
begin
read(m[i]);
if m[i]<0 then m[i]=0;
end;
for i:=1 to n do
write(m[i], ' ');
end.
Константой задано число n.
Во второй строке задано n чисел для массива.
using namespace std;
int main()
{
int n;
cin>>n;
int arr[n];
for(int a = 0; a<n; a++)
{
cin>>arr[a];
}
for(int i = 0; i<n; i++)
{
if(arr[i]<0) arr[i]=0;
}
for(int a = 0; a<n; a++)
{
cout<<arr[a]<<" ";
}
}