Помогите пажалуйста

The main types of questions

Составьте свои предложения со словами омонимами

Срочно помогите из Паскаля в кумир

Var

 a,b,c:integer;

begin

 read(a,b,c);

 if a+b+c>100 then writeln(Сумма больше 100=,a+b+c) else writeln(Сумма=,a+b+c);

end.

200

50

8

Сумма больше 100=258

Запиши два відношення, значення яких дорівнює: а) 2; б) 0,2 В) 2/5

Помогите пожалуйста решить задачу по экономике!!!