Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Мышка007
09.02.2021 15:49 •
Информатика
Дано целое число.если оно является кратным 3,то прибавить к нему 1,в проломанном случае не изменять его. вывести полученное число. блок схема
Показать ответ
Ответ:
peschanskaakris
24.12.2019 14:03
ответ: var a: integer;
begin
readln (a);
if (a> 0) then
begin
a: =a+1;
writeln (a);
end
else
writeln (a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
10alinka01
07.12.2020 10:22
Решите по ! 3.алфавит некоторого языка состоит из 4 символов.оцените в байтах информационный объем сообщения длиной в 16 символов....
semyanivskyilly
26.03.2023 12:15
Решить ! выполните операцию сложения над двоичными числами: а) 101010+1101; б) 1010+1010; в) 10101+111. заранее, большое !...
Викторина22
26.03.2023 12:15
Пользователь вводил текст с клавиатуры 10 минут. какова его скорость ввода информации, если информационный объем полученного текста равен 1 кбайт? с решением...
smail130
21.08.2020 17:05
Есть ли сим-карта на планшете explay squad 9.71...
HelpSpasibox
21.08.2020 17:05
Сколько битов информации содержит любое трехзначное восьмеричное число?...
jasmina14
04.05.2020 23:58
Запишите в 2 й , в 8 й , в 16й, системе счисления десятичные числа 212 543...
123julia456f678
02.11.2021 12:31
Не поняла как решается . (2) + 1101010101(2) б) 1011001010(2) + 101011010(2) в) 1110111000,101(2) + 1101100011,101(2) г) 1430,2(8)+666,3(8) д) 388,3(16)+209,4(16)4:...
kotodrotin
02.11.2021 12:31
Сообщение,записанное буквами из 64-символьного алфавита,содержит 100 символов. какой объем информации оно несет?...
danayamirnaya
31.01.2023 11:54
Организация решила объединить имеющиеся у них компьютеры в централизованную локальную сеть. какие компоненты вычислительной сети для этого необходимы?...
078901234567
31.01.2023 11:54
Передача файла размером 1250 кбайт чере некоторое соединение заняла 40с. определите скорость передачи данных через это соединение....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
ответ: var a: integer;
begin
readln (a);
if (a> 0) then
begin
a: =a+1;
writeln (a);
end
else
writeln (a);
end.