Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Солнцеголовик
07.09.2022 11:08 •
Информатика
Нормальный пульс человека 60 ударов в минут .напишите программу,которая определит здоров ли человек.
Показать ответ
Ответ:
Даниил12345666
30.06.2020 09:48
Program znanija;
var b:integer;
begin
writeln('Какой у вас пульc(в ударах в минуту)?');
readln(b);
begin if b=60 then writeln('Это нормальный пульс человека')
else writeln('Ваш пульс не соответствует норме');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
silvi82
08.03.2021 18:55
Сформулировать таблицу квадратов чисел от 1 до 15. использовать цикл до (с постусловием). то есть, написать простой алгоритм на паскале....
MrZheka17
08.03.2021 18:55
1. алфавит племени мульти состоит из 8 букв. какое количество информации содержит сообщение, состоящее из 13 символов?...
sasapanskov
05.11.2022 13:12
5. разработать программу, моделирующую игру “скачки”. в игре участвуют 10 наездников; за каждый тур игры каждый из них продвигается вперед на расстояние от 1 до 5...
ladhice
28.12.2022 05:22
Дана матрица а (4, 5) 2, 3, -5, -10, 7 4, -10, -3, 2, 4 5, -2, -7, 11, -13 18, 19, -2, -4, -7 из нее образовать две матрицы: в одной оставить все отрицательные элементы...
28.12.2022 05:22
Нужна . цифровой бланк оплаты услуги за пользование электроэнергией имеет вид: лицевой счет – поле из 12 цифр, месяц – поле длины 8 в алфавите из 22 символов, год...
1234567890djsbdnfkd
29.12.2022 10:32
Вчём отличие эрганомической клавиатуры от обычной...
GenGis
29.12.2022 10:32
Перечислить характерные особенности сенсорных устройств ввода...
Maks2801
29.12.2022 10:32
Решить по информатике : ) 1) в случае истинности логического выражения (a =x and b =x) or (c =x and x =d) можно утверждать, что (1) x принадлежит отрезку [c; d] и...
ПоляУ1
18.03.2023 10:05
Для чего необходимо в программе определять тип переменной...
logan323
18.03.2023 10:05
Расположите величины в порядке убывания : 1024 бита; 1000 байтов; 1 бит; 1 байт; 1 кбайт....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var b:integer;
begin
writeln('Какой у вас пульc(в ударах в минуту)?');
readln(b);
begin if b=60 then writeln('Это нормальный пульс человека')
else writeln('Ваш пульс не соответствует норме');
end;
end.