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

160

235

Посмотреть ответы 2

Ответы на вопрос:

Alyyya

Информатика

4,4(94 оценок)

Решение на 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) > = 3 ) and ( (w_new - w_old) > = 700) then writeln('ваш ребёнок развивается хорошо') else writeln('ваш ребёнок меньше нормы'); end.