Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
568954
03.03.2023 03:37 •
Информатика
Дано число если оно является не целым то вывести точку, а иначе прямоугольник.
Ответ:
Irisha1986
10.10.2020 02:14
var a:integer;
begin
write('введите число');
read(a);
if (a>1) then a:=a+1 else a:=a-2;
write(a);
0,0
(0 оценок)
Популярные вопросы: Информатика
modernteenager1
04.08.2022 17:25
Определить десятичное значение двоичного числа 100100.01...
Djzhdujd
23.08.2020 07:31
Оптические волокна переносят данные в виде испульсов...
2002dima14
09.01.2022 23:37
Синтаксический разбор предложения вдруг среди лесной тишины я услышал хруст снега и шум раздвигаемых веток...
7534558
09.01.2022 23:37
Как написать предложение: ,,п ,-а. [-=],а[-=]....
rlicSosanex
09.01.2022 23:37
Малый поршень гидравлического пресса под действием силы f=500н опустился на h= 12 см. определите силу давления, действующую на большой поршень , если он поднялся...
maksderbenevMarc
09.01.2022 23:37
Участие беларуси в реализации международных проектов по решению проблем...
angelinalitvine
09.01.2022 23:37
А1 наука, изучающая функции органов и их систем 1анатомия 3гигиена 4эмбриология а2повышенное содержание сахара в крови свидетельствует о нарушении функции 1) почек...
gjkbyf6789
09.01.2022 23:37
Строение атома: ядро, электронная оболочка. элемент. схемы строения атома на примете трех хим. элементов первых трех периодов....
svetakotelniko
09.01.2022 23:37
Атасы бүгің ауылға келді.олар ертең тауға бармақшы....
Mashatry
09.01.2022 23:37
1. оружие массового поражения: омп): его виды и действия. как действует на человека и на окружающую среду. 2. обеспечение национальной и военной безопастности россии....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a:integer;
begin
write('введите число');
read(a);
if (a>1) then a:=a+1 else a:=a-2;
write(a);