Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Arino4ka7381
31.12.2021 11:32 •
Информатика
Впаскале. с оператора while напишите программу определения идеального веса для взрослых по формуле: ид. вес=рост-100. выход из цикла : значение роста=250
Показать ответ
Ответ:
bosschornoguz
23.07.2020 16:54
Var a,b,c:integer;
begin
a:=180;
while a<=250 do begin
b:=a-100;
writeln('идеальный вес для ', a ,' метра роста ', b,' килограмм');
a:=a+1;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
BOSS653
15.06.2020 02:22
Запишите и сложите числа X и Y в прямом, обратном, дополнительном, модифицированном обратном и модифицированном дополнительном кодах. X= -110001 Y = 10111. Перевести...
Vampir181
13.08.2021 20:28
Из каких этапов состоит разработка сценария компьютерной игры даю 5б...
ponomariov17p01k9s
07.12.2020 17:03
1.какой минимальный объем памяти в килобайтах нужно зарезервировать, чтобы можно было сохранить любое растровое изображение размером 128 на 256 пикселов при условии,...
vafla3121
04.06.2022 11:00
1. запишите 32-битный ip address в виде четырех десятичных чисел, разделенных точками: 1) 11001100100110001011111001000111 2) 11011110110000111010001000110010 2....
falinova07
15.12.2020 22:06
Напишите открыти поразивший весь мир мини проект...
Шаурма1111111
15.12.2020 22:06
Есть чашечные весы без делений. для взвешивания груза также можно использовать гирьки, массы которых - целое число граммов. вам необходимо предложить набор гирек,...
oksanademyanov
23.05.2023 12:46
Решить логическую схему , могу кинуть сотку на киви потом...
Molka2005
26.08.2020 22:43
2. найти значение выражения: (a + (d - 12)*3) * (c - 5*k), где a) значения переменных a, d, c и k вводятся с клавиатуры. b) даны в тексте программы (на паскале)...
vikacat12345
13.03.2021 10:52
Файл размером 32 кбайта передаётся через некоторое соединение со скоростью 1024 бита в секунду. определите размер файла (в байтах), который можно передать за то...
ivanovayo08
31.08.2020 01:10
дам все свои надо написать сочинение на тему «Проблема истинных и ложных идеалов» в произведении «Дон Кихот» только не из инета а самостоятельно, так как учительница...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
a:=180;
while a<=250 do begin
b:=a-100;
writeln('идеальный вес для ', a ,' метра роста ', b,' килограмм');
a:=a+1;
end;
end.