Это не такое уж и сложное задание. Ты могла бы его сделать сама.
P.S Я надеюсь, что я всё сделал правильно (но это неточно) :)
Всмысле какая задача? (Ну если я правильно понял вопрос,то математическая)
Тут находится только С по формуле: (A+B)*(B-A) и выводит результат (С) на экран.
Var s1,s2,s3:string;
v1,v2,v3,r1,r2,r3:integer;
begin
write('1 имя : '); readln(s1);
write('вес и рост : '); readln(v1,r1);
write('2 имя : '); readln(s2);
write('вес и рост : '); readln(v2,r2);
write('3 имя : '); readln(s3);
write('вес и рост : '); readln(v3,r3);
writeln(s1,'+',s2,'+',s3,' = ',v1+v2+v3,' кг');
writeln(s1,'+',s2,'+',s3,' = ',r1+r2+r3,' см');end.
Пример:
1 имя : Петя
вес и рост : 55 160
2 имя : Вася
вес и рост : 40 150
3 имя : Коля
вес и рост : 48 155
Петя+Вася+Коля = 143 кг
Петя+Вася+Коля = 465 см
1.
b=9%5=4
b=b*10=4*10=40
a=b//5-3=40/8-3=5-3=2
2.
b=a//10=167//10=16
b=b/4+2=16/4+2=4+2=6
a=b*25+2=25*6+2=150+2=152
a=a+b=152+6=158
3.
b=a//100+a%100=841//100+841%100=8+41=49
a=a//10=841//10=84
a=a%10=84%10=4
a=a+b=4+49=53
4.
a=a//b=344//8=172//4=86//2=43
b=a%b=43%8=3
5.
b=a+b=20+18=38
a=b-a=38-20=18
b=b+a=18+38=56
<u><em>Полезная инфа.</em></u>
<em>// - </em><em>деление нацело.</em>
<em>% - остаток от деления нацело.</em>
<em>**-возведение в степень.</em>
<em>*,-,+,/ - обычные арифметические действия.</em>