63

Информатика «Программирование разветвляющихся алгоритмов» 1. Увеличить число X…

04 марта 2023

Информатика «Программирование разветвляющихся алгоритмов» 1. Увеличить число X на 10, если оно положительное, во всех остальных случаях уменьшить на 10.

категория: информатика

46

var x: integer; Begin read (x); if x>0 then x: =x+10 else x: =x-10; writeln (x); read (x); if x>0 then x: =x+5; writeln (x); End.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...