Васильева-Александрович
Васильева-Александрович
24.06.2020
?>

Дано целое число. Если оно является положительным, то прибавить к нему 3; в противном случае вычесть из него 2. Вывести полученное число. УМОЛЯЮЮЮ ЛЮДИИИ

Информатика
Ответить

Ответы

Natalimis416024
Natalimis416024
24.06.2020

var x: integer;

begin

 Write('Ведите целое число: '); ReadLn(x);

 if x >= 0 then x := x + 3 else x := x - 2;

 WriteLn('x = ', x);

end.

Объяснение:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дано целое число. Если оно является положительным, то прибавить к нему 3; в противном случае вычесть из него 2. Вывести полученное число. УМОЛЯЮЮЮ ЛЮДИИИ
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

market-line5260
9BA0+D7F1, 1615внизу семь+3524внизу семь решить пример по информатике​
Автор: market-line5260
Николаевна1564
Данные объемом 100 мбайт из пункта а в пункт б по каналу связи, обеспечивающему скорость передачи данных 220 бит в секунду, а затем из пункта б в пункт в по каналу связи, обеспечивающему скорость п...
Автор: Николаевна1564
Sadikova Gavrikov
Алгоритмом можно считать … список покупок расписание автобуса технический паспорт стиральной машины описание процесса посадки дерева
Автор: Sadikova Gavrikov
olyaartemenko
Яке розширення мають файли, збережені в програмі Microsoft Acess?
Автор: olyaartemenko
Yurevich1701
1. в одномерном массиве определить максимальную длину неубывающего участ-ка. например, для 6 3 4 1 2 3 5 0 -2 -1 ответом будет 4. 2. найдите наиболее часто повторяющееся в массиве число.
Автор: Yurevich1701
antrotip
Язык-Паскаль Необходимо найти и исправить ошибку в условномоператоре:А) if x 5) then writeln('истина'); x=4
Автор: antrotip
Феофанов_Никита1067
Как узнать в какой системе счисления выполнено действие : 89+98=121 ? если можно подробнее, никак не разберусь((
Автор: Феофанов_Никита1067
snk7777202
Выбери правильную команду присваивания. Ж:=9; D:=9; D=9; Ж=9; D=:9;
Автор: snk7777202
Олег86
Скаким " черным ящиком" встречается человек в современном мире?
Автор: Олег86
Paradismebel
2 задание. Что будет выведено в результате выполнения цикла? а) for x:=1 to 5 do write (‘ # ’); б) for x:=0 to 5 do write (‘ # ’); в) for x:=2 to 7 do write (‘ # ’); Задания выполнить в тетради.
Автор: Paradismebel
Стадник620
Составить программу подсчитывающую сколько дней в январе было с температурой выше, ниже и равной средней температуре месяца
Автор: Стадник620
zabava-83
Сколько раз будет выполняться цикл for(int i = 1; i < 10; i++)? с++​
Автор: zabava-83
kitoova
Як виконується фрагмент алгоритму наведений на малюнку 3.43?
Автор: kitoova
Mexx9050
Даны целые числа a, b и n.требуется найти количество целых x таких, что 0< =х
Автор: Mexx9050
Logukate
Даны координаты точек на плоскости.принадлежит ли точка с координатами (a , b) заданному треугольнику треугольник с точками x1y1 x2y2 x3y3
Автор: Logukate
▲