Необходимо составить программку ветвления по информатике!Для задачки: На приеме у педиатра

Необходимо составить программу ветвления по информатике!Для задачки: На приеме у педиатра производится измерение роста и всеса грудных малышей в возрасте до 3-х месяцев.Компьютер найти рост и вес месяц вспять . Рост и вес малыша в денек приема,если ребенок на три сантиметра вырос и более,а вес возрос на 700 грамм и более выдается сообщениие ,что развивается хорошо,если прибавил меньше трех см или вес меньше чем на 700 грамм,выдается извещенье ребенок меньше нормы

Задать свой вопрос
1 ответ
Вариант решения на Pascal program pediatr; var h_old, h_new, w_old, w_new: integer; begin write(введите рост ребёнка месяц назад (в см): ); readln(h_old); write(введите рост ребёнка на данный момент (в см): ); readln(h_new); write(введите вес ребёнка месяц вспять (в г): ); readln(w_old); write(введите рост ребёнка на данный момент (в г): ); readln(w_new); if ( (h_new - h_old) gt;= 3 ) and ( (w_new - w_old) gt;= 700) then writeln(Ваш ребёнок развивается хорошо) else writeln(Ваш ребёнок меньше нормы); end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт