0 / 0 / 0
Регистрация: 30.09.2010
Сообщений: 3

Возвести в квадрат все нечетные отрицательные числа массива

30.09.2010, 14:44. Показов 2625. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
8.21. В массиве A(п), состоящий из вещественных чисел, возвести в квадрат все нечетные отрицательные числа, а положительные четные заменить на единицу.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
30.09.2010, 14:44
Ответы с готовыми решениями:

Все отрицательные элементы массива заменить единицей, положительные возвести в квадрат, нули оставить
Создать массив случайных чисел на интервале от -15 до 15. Все отрицательные элементы заменить единицей, положительные - возвести в квадрат...

Условный оператор: четные числа возвести в квадрат, нечетные числа увеличить в два раза
Заданы три целых числа. Четные числа возвести в квадрат. Нечетные числа увеличить в два раза. Вывести на экран все числа.

Возвести в квадрат все нечетные отрицательные числа массива
В массиве А(n), состоящем из целых чисел, возвести в квадрат все нечетные отрицательные числа, а положительные четные заменить на единицу.

3
 Аватар для Dear Bear
22 / 22 / 3
Регистрация: 28.09.2010
Сообщений: 100
30.09.2010, 15:03
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
program pr;
const n=5;
type massiv=array [1..n] of integer;
var
   mas:massiv;
   i:integer;
begin
     writeln('вводим массив');
     for i:=1 to n do
     begin
          write('mas[',i,']=');
          readln(mas[i]);
     end;
     for i:=1 to n do
     begin
          if (mas[i]<0) and (frac(mas[i]/2)<>0) then mas[i]:=sqr(mas[i]);
          if (mas[i]>0) and (frac(mas[i]/2)=0) then mas[i]:=1;
     end;
     for i:=1 to n do
     writeln('mas[',i,']=',mas[i]);
end.
0
Фрилансер
 Аватар для Mad_Dog
452 / 433 / 117
Регистрация: 01.06.2010
Сообщений: 1,314
30.09.2010, 15:16
илья 93, уточни задачу, а именно, как можно определить четность/нечетность вещественного числа? Может имеется ввиду позиция числа в массиве (четный/нечетный индекс)???

Добавлено через 2 минуты

Dear_Bear,а это
Pascal
1
frac(mas[i]/2)<>0)
что - способ определения четности вещественного числа???
0
 Аватар для Dear Bear
22 / 22 / 3
Регистрация: 28.09.2010
Сообщений: 100
30.09.2010, 16:40
вообще функция frac возвращает дробную часть числа... На сколькоя помню, то если число делется на 2 без остатка то это четное, а если есть остаток то нечетно....
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
30.09.2010, 16:40
Помогаю со студенческими работами здесь

Возвести в квадрат все нечетные отрицательные числа
В массиве A(n), состоящий из вещественных чисел, возвести в квадрат все нечетные отрицательные числа, а положительные четные заменить на...

Массив. Возвести в квадрат все нечетные отрицательные числа, а положительные четные заменить на единицу
В массиве A(n), состсящим из целых чисел, возвести в квадрат все нечетные отрицательные числа, а положительные четные заменить на единицу.

Все отрицательные числа массива возвести в квадрат
Задание : Разработать модуль, содержащий процедуру формирования массива. ввода, процедуры вычисления произведения четных элементов,...

Массив. Возвести в квадрат все нечетные отрицательные, а положительные четные заменить на единицу
В массиве А(n), состоящем из целых чисел, возвести в квадрат все нечетные отрицательные числа, а положительные четные заменить на единицу.

Возвести в квадрат число, если все цифры этого числа нечетные и неотрицательные
дано четырехзначное число возвести в квадрат число если все цифры этого числа нечетные и неотрицательные в противном случае найти сумму...


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

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

Новые блоги и статьи
Облачные приложения на Rust: руководство по архитектуре микросервисов
golander 13.07.2025
Когда я впервые взялся за проектирование облачной платформы для одного из наших клиентов, выбор стоял между привычными Go и Java. Но после нескольких месяцев разработки микросервисной системы,. . .
Как Node.js выполняет асинхронные операции
Reangularity 13.07.2025
Каждый раз, когда я рассказываю про Node. js, возникает один и тот же вопрос: "Как эта штука может быть быстрой, если JavaScript — однопоточный язык?" И это действительно кажется парадоксом. Ведь в. . .
Как писать чистый, тестируемый и качественный код на Python
py-thonny 12.07.2025
Помню свой первый проект на Python. Работал тогда быстро, грязно, лишь бы работало. Код был похож на запутанный клубок - переменные по одной букве, функции на 200 строк, комментарии отсутствовали как. . .
Blazor и контроллер сервопривода IoT Meadow Maple
Wired 11.07.2025
Я решил разобраться, как можно соединить современные веб-технологии с миром "железа". Интересная комбинация получилась из Blazor в качестве веб-интерфейса и микроконтроллера Meadow с его веб-сервером. . .
Генерация OpenQASM из кода Q#
EggHead 10.07.2025
Летом 2024-го я начал эксперименты с библиотекой Q# Bridge, и знаете что? Она оказалась просто находкой для тех, кто работает на стыке разных квантовых экосистем. Основная фишка этой библиотеки -. . .
Изучаем новый шаблон ИИ-чата .NET AI Chat Web App
stackOverflow 10.07.2025
В . NET появилось интересное обновление - новый шаблон ИИ-чата под названием . NET AI Chat Web App. Когда я впервые наткнулся на анонс этого шаблона, то сразу понял, что Microsoft наконец-то. . .
Результаты исследования от команды ARP (июль 2025 г.)
Programma_Boinc 10.07.2025
Результаты исследования от команды ARP (июль 2025 г. ) Африканский проект по дождям (ARP) World Community Grid снова запущен! Мы рады поделиться обновленной информацией о нашем прогрессе с осени. . .
Angular vs Svelte - что лучше?
Reangularity 09.07.2025
Сегодня рынок разделился на несколько четких категорий: тяжеловесы корпоративного уровня (Angular), гибкие универсалы (React), прогрессивные решения (Vue) и новая волна компилируемых фреймворков. . .
Code First и Database First в Entity Framework
UnmanagedCoder 09.07.2025
Entity Framework дает нам свободу выбора, предлагая как Code First, так и Database First подходы. Но эта свобода порождает вечный вопрос — какой подход выбрать? Entity Framework — это. . .
Как использовать Bluetooth-модуль HC-05 с Arduino
Wired 08.07.2025
Bluetooth - это технология, созданная чтобы заменить кабельные соединения. Обычно ее используют для связи небольших устройств: мобильных телефонов, ноутбуков, наушников и т. д. Работает она на частоте. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru