Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
KateySh
20.01.2021 10:51 •
Информатика
Ввести рост человека. вывести на экран "высокий", если его рост превышает, 180 см и "не высокий" в противном случае.
Ответ:
Neekeetos
03.07.2020 18:50
Если писать в паскале(Pascal ABC) то попробуй так:
Uses crt;
Var
a:real;
begin
readln(a);
if (a > 180) then
writeln ('Высокий')
else
writeln ('Не очень высокий);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
dedovdima14
27.01.2023 05:00
Что это форма, отчет или запрос?...
Vikohkamy
20.05.2023 04:32
здесь надо найти пословицу учитель подсказал что пословица начинаеться с букв На ......
daryadaletskay
25.09.2020 06:46
Які кольори є базовими в колірній моделі CMYK?...
A11002030999
06.07.2021 02:20
Мне нужен скрипт чтобы когда нажимаешь закрыть программу появлялось окно с действием вы уверенны что хотите выйти?...
KINDER123567
24.02.2021 16:25
1. I Mario for some time since he left Milan a few years ago. Выберите один ответ: a. didn t see b. haven’t seen c. don’t see 2.Who designed St Paul’s Cathedral? Выберите...
vtkmlth
24.02.2021 16:25
ОООЧЕНЬ Выбери верное утверждение. 1.Бластула – это двухслойный зародыш 2.В результате дробления образуются клетки, которые энергично растут. 3.Гаструла возникает путём...
Danil244564
24.02.2021 16:25
Складіть квадратне рівняння в якому: a=-5, b=12, c=-5...
SensRow
24.02.2021 16:25
Яка будова металевого провідника? 2. Чому за звичайних умов будь-який шматок металу є електрично нейтральним? 3. Як довести, що електричний струм у металах виникає внаслідок...
Marii111
12.07.2022 15:56
Буду очень признательна за...
nbibyf2005
24.02.2021 16:25
Вставить a little или a few 1 put flour 2 addsugar 3 sliceapples 4 cut oranges 5 pourhoney 6 add baking soda 7 chop potatoes 8 boilspaghetti 9 bake bread 10 addbutter Вставить...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Uses crt;
Var
a:real;
begin
readln(a);
if (a > 180) then
writeln ('Высокий')
else
writeln ('Не очень высокий);
End.