Guest User

Untitled

a guest
Dec 17th, 2018
66
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.44 KB | None | 0 0
  1. Program vasya;
  2. Begin
  3. for var senior:=0 to 100 do begin
  4. for var middle:=0 to 100-senior do begin
  5. var junior:= 100 - (senior+middle);
  6. if (20*senior+10*middle+junior=200) then begin
  7. writeln('Результат:');
  8. writeln(' - Младших: ', junior);
  9. writeln(' - Средних: ', middle);
  10. write(' - Старших: ', senior);
  11. end;
  12. end;
  13. end;
  14. End.
Add Comment
Please, Sign In to add comment