tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Впаскале. с оператора while напишите
Впаскале. с оператора while напишите программу определения идеального веса для взрослых по формуле: ид. вес=рост-100. выход из цикла : значение роста=250
gffgv
3 29.06.2019 19:20
4
Ответы
милуя
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
йщз
02.03.2021 21:10
Чем различаются значения 10 N, 15 + 2N, N + 5 (пример задач)? Что зависит от расположения N и чисел, а также коэффициента (?) N? Задачи для примера: 17. В хирургическом отделении...
SAHARIA
02.03.2021 21:11
Определите значение переменной f после выполнения фрагмента алгоритма. f:=1нц для i от 1 до 5f:=f*iкц...
Volovoy00T
02.03.2021 21:11
Запросить у пользователя температуру вещества воды. Вывести сообщение о том, в каком она состоянии: твёрдое состояние - лёд, жидкость - вода, точка плавления (0 0С при нормальном...
naoimiiwsvb2
17.05.2021 09:04
Отметь цифровые устройства? * книга, электронная книга, телефонэлектронная книга, планшет, компьютеркомпьютер, литературная книга, планшетпланшет, телевизор, книга...
Akosh11
15.05.2020 08:01
Составте 1 толстый и один тонкий но по содержанию во содержанию прочитанного текста вода...
Илья55555555
15.05.2020 08:01
Задание №3. Составь рассказ о возникновении ВШП. План описания 1 Маршруты ВШП 2 Виды торговли 3 Перевозимые товары 4 Достижения в архитектуре и строительстве 5 Религиозные...
vladimir00041
15.05.2020 08:01
Сделайте ионное уравнение P2O5+3Na2O=2Na3PO4...
linnik4Platon
15.05.2020 08:01
решить эти 3 задания ! Заранее за...
ира1005
15.05.2020 08:01
Вкажіть найбільшу річку Євразії що не належить до басейну внутрішнього стоку: А:Єнісей Б:Сидар я В:Амуляр я Г:Волга...
Windows1011
15.05.2020 08:01
Найдите два числа значение суммы которых равно 5/56 значение разности 1/168 ...
Популярные вопросы
Read Rob’s list. Look at page 58 in the Student’s Book (part one). — Прочитайте...
1
Listen to the conversation and practise with your friend. — Послушай разговор...
1
Talk to your friend. What is he going to do today? Ask your own questions....
3
Read the text about Moscow on page 60 in the Student’s Book (part one)....
2
Make a tourist folder for your town. — Сделайте туристическую папку для...
1
What can you do in London? Look and write. — Что вы можете делать в Лондоне?...
1
What do you need on safari in Africa? Play a game. — Что нужно на сафари...
3
Прочитай и выпиши слова с буквой и в соответствии со звуками, которые обозначает...
1
How shall we go? Как нам надо ехать? Listen and point. Послушайте и покажите....
1
Circle the correct places. — Обведите правильные места. 1. The fountains...
2
begin
a:=180;
while a<=250 do begin
b:=a-100;
writeln('идеальный вес для ', a ,' метра роста ', b,' килограмм');
a:=a+1;
end;
end.