Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
baten
16.02.2023 11:05 •
Информатика
1. дано целое число а. если значение а > 0, то необходимо увеличить его на единицу. написать программу для решения этой . программа должна иметь дру-жественный интерфейс. протестировать программу для a=5, a=-4, a=0.
Ответ:
MariaMmchka
21.08.2020 07:54
Var a:integer;
begin
readln(a);
if a<0 then a:=a+1;
writeln(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ViktorVivat
01.03.2021 04:13
написать программу (Язык программирования Pascal)...
verayusupova86
16.07.2022 11:26
Впаскаль. дана последовательность чисел 1,2,3,4,. напишите программу, которая вычисляет количество чисел кратных 6. , нужно!...
Nikita4539
03.04.2022 01:40
Одноклеточная амеба каждые три часа делится пополам. составьте программу определения количества амеб через 3, 6, 9, 12, 24 часов....
tanushkako
10.02.2021 09:23
Дано трёхзначное число напишите программу выводящую двузначное число состоящие из первой и третьей цифры числа...
Hockeyist97
10.02.2021 09:23
Дано целое число если оно отрицательное, то возвести его в квадрат; есди положительное или равное нулю, то найти его куб...
bcfujd19
10.02.2021 09:23
Написать программу вычисляющую функцию: y=√x+3...
Nikitanesh000789
27.10.2021 05:15
Впорядке возрастания единицы измерения информации указаны в последовательности … выберите один ответ: a. байт, мегабайт, килобайт, гигабайт b. байт, килобайт, мегабайт,...
pudish
06.02.2022 15:18
Сделайте координатный рисунок: машина (-3,5; 0,5), (-2,5; 0,5), (-1,5; 3,5), (0,5; 3,5), (0,5; -0,5), (1; -0,5), (1; 0), (1,5; 0), (5,5; 4), (5,75; 4), (6,75; 5), (5,5;...
alkamilk
06.02.2022 15:18
Цветное (с палитрой из 256 цветов) растровое графическое изображение имеет размер 10*10 точек. какой объем памяти займет это изображение? а) 100 бит; б) 400 байт; в) 800...
garkachev20031
09.01.2022 02:03
какую функцию в среде программирование выполняют компоненты визуальной среды? 2 что вы можете сказать о о компоненте radiogroup и его свойствах? 3 как вы опишите работу...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
readln(a);
if a<0 then a:=a+1;
writeln(a);
end.