Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
kirra00787p07znc
09.06.2020 19:57 •
Информатика
Ввести рост человека. вывести на экран "высокий", если его рост превышает, 180 см и "не высокий" в противном случае.
Показать ответ
Ответ:
SteveDog86
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 оценок)
Популярные вопросы: Информатика
Anel7575
22.06.2020 06:50
с информатикой! Язык программирования C++ I. Написать программу, которая вычисляет значение выражения. Замечания 1) Для вывода результата использовать манипуляторы для форматирования...
helpmeplease24
08.01.2023 04:37
До ть Потрібно малюнками в Power Point або картинками описати вірус Троянський кінь (троян) ...
VendyK
28.08.2022 10:07
Переведите программу из Pascal в Python var n : integer; i, j, k : integer; begin write( n = ); readln(n); for k := 1 to n do for i := 1 to Trunc(Sqrt(K)) do for j := i...
TigerForceCasual
26.05.2021 17:00
В списке состоящем из 10 элементов a=[1,3,5,7,9,8,6,4,2,10] нужно поменять местами 4 и 9 элементы делать в ПАЙТОН ...
apdemyanovozaif8
07.04.2022 11:09
с 4 вопросами. 1. Средняя информация в сообщении определяется формулой (при равновероятных событиях или с разной вероятностью): 2. Вычисление информации в одном символе...
tashkaostrovska
07.05.2022 17:22
Язык Pascal. Напишите программу, которая позволяет вводить координаты двух точек на плоскости. (координаты целочисленые) и выводит на экран расстояние между ними....
полина2130
06.03.2021 04:02
Выделите те числа, которые не превосходят десятичного числа 50. 62₈ 45₁₆ 110011₂ 33₁₆ 110000₂...
LIquid0Horse
07.09.2020 09:51
По какому параметру различаются шрифты одной гарнитуры?...
Ульяна2732
08.02.2023 06:40
Когда появляется необходимость использования СУБАЛГОРИТМОВ ? Приведите примеры...
1Кусочек2Счастья
09.02.2020 04:28
Задача 1 Черно-белое (без градаций серого) растровое графическое изображение имеет размер 64х128 точек. Какой объем памяти займет это изображение? ответ дайте в Кбайт...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Uses crt;
Var
a:real;
begin
readln(a);
if (a > 180) then
writeln ('Высокий')
else
writeln ('Не очень высокий);
End.