М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
VanessaQueen
VanessaQueen
29.09.2020 00:17 •  Информатика

Составь и запиши программу на языке Паскаль, которая, если введенное число отрицательное, меняет его на противоположное.

👇
Ответ:
Milana8211
Milana8211
29.09.2020

Program abc;

var a:integer;

begin

 Write('Введите число:');readln(a);

 if a<0 then a:=abs(a);

  Writeln(a);

end.

4,8(99 оценок)
Ответ:
nvede
nvede
29.09.2020
Конечно, вот программа на языке Паскаль, которая изменяет введенное число на противоположное, если оно отрицательное:

```pascal
program ChangeNegativeNumber;

var
number: integer;

begin
writeln('Введите число:');
readln(number);

if number < 0 then
begin
number := -number; // меняем знак числа на противоположный
end;

writeln('Измененное число:', number); // выводим измененное число
end.
```

Объяснение:

1. Программа начинается с определения переменной `number`, которая будет хранить введенное число.

2. Затем, с помощью команды `writeln`, программа выводит сообщение "Введите число:", чтобы показать, что пользователю нужно ввести число.

3. С помощью команды `readln` программа считывает число, введенное пользователем, и сохраняет его в переменную `number`.

4. Далее программа проверяет условие `number < 0`, чтобы узнать, является ли число отрицательным.

5. Если условие истинно, то выполняется блок кода, начинающийся с команды `begin`. Внутри этого блока кода выполняется команда `number := -number`, которая меняет знак числа на противоположный путем умножения его на `-1`.

6. Если условие `number < 0` ложно, то блок кода после команды `begin` не выполняется.

7. Выводится сообщение "Измененное число:", а затем выводится измененное число с помощью команды `writeln`.

Теперь, если пользователь введет отрицательное число, программа изменит его на противоположное. Если пользователь введет положительное число или ноль, программа оставит это число без изменений.
4,5(40 оценок)
Проверить ответ в нейросети
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ