Вводим имя человека,рост и вес,выводим имя человека и разность роста и веса. Паскаль.
Var s:string; a,b:integer; Begin write('Введите имя '); Readln(s); write('Введите рост и вес '); Readln(a,b); write('У человека по имени ',s,' разница роста к весу равна ',a-b); End.
Спасибо огромное с: