Question

помогите пожалуйста решить 3 задачу
заранее спасибо)))

Answer 1

Var a, b:integer;
Begin
Read(a, b) ;
If a+b=10 then write('молодец') else write(что случилось') ;
End.